Skip to content
Prev 96179 / 398500 Next

rbind, array

Try this:

y <- array(1:27, c(3, 3, 3))   # test array
rbind(y[,,1], y[,,2], y[,,3])
apply(y, 2, I)

# verify that last two lines give same result
identical(apply(y, 2, I), rbind(y[,,1], y[,,2], y[,,3]))  # TRUE
On 7/16/06, Robert Mcfadden <robert-mcfadden at o2.pl> wrote: