Question on list objects

Hi Ron,

Here you go.

Cheers,

Josh

dat <- matrix(1:9,3)
ldat <- list(dat, dat, dat)
ldat[[1]] == dat

## Or
lapply(1:3, function(x) dat)
## which is similar in spirit to
output <- vector("list", 3)
for(i in 1:3) {
  output[[i]] <- dat
}

list1 <- list2 <- vector("list", length=2)

for(i in 1:2) {
  list1[[i]] <- matrix(rnorm(15), 3)
  list2[[i]] <- matrix(rnorm(15), 3)
 }

lapply(1:2, function(x) {list1[[x]] + list2[[x]]})

## This can be done more simply
lapply(1:2, function(x) {matrix(rnorm(15), 3) + matrix(rnorm(15), 3)})

Question on list objects

Thread (4 messages)