Sorry about my last lengthy post. Here is a more condensed problem that I am running into with the all
function.
As an example, below you can see my console output in which the all
function seems to only check whether the last element of x
satisfies the all
condition.
> x
[1] 0.7583398 0.8352907 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.8683173 0.8683173 0.7004333
[15] 0.7004333 0.8683173 0.8683173 0.8683173 0.7004333 0.7004333 0.7004333 0.7004333 0.8683173 0.8683173 0.7004333 0.7004333 0.7004333 0.7004333
[29] 0.7004333 0.8683173 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.8683173 0.7004333 0.7004333 0.8683173 0.7004333 0.7004333 0.7004333
[43] 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.8683173 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333
[57] 0.8683173 0.7004333 0.8683173 0.7004333 0.7004333 0.7004333 0.8683173 0.8683173 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333
[71] 0.8683173 0.7004333 0.7004333 0.7004333 0.7004333 0.8683173 0.7004333 0.7004333 0.7004333 0.7004333 0.7004333 0.8683173 0.8683173
> x1[t]
[1] 0.7004333
> x2[t]
[1] 0.8683173
> x3[t]
[1] 0.8683173
> all(c(x1[t],x2[t], x3[t]) %in% x)
[1] FALSE
> all(c(x2[t],x2[t], x3[t]) %in% x)
[1] TRUE
> all(c(x1[t],x1[t], x1[t]) %in% x)
[1] FALSE