When an attempt was made to reproduce this on other platforms,
how high was the index? For one of my Apples, I need to take
it very high, maybe 1000000? Sorry, I guess I edited that part
out.
--
zi <- vector()
for(i in 1:1000000) {
zi[i] <- c(1,2)
}
zi[,1]
--