Skip to content
Prev 165266 / 398506 Next

Print a list in columns

Perhaps not the most elegant solution, but this seems to "work".

 > a<- rnorm(5)
 > b <- rnorm(10)
 > clis <- list(a,b)
 > dput(clis, "testfile") # writes to file
#dput works for arbitrary structures

Now pad the shorter of the vectors with NA's and "print" the result of  
cbind
 > mv <-max(length(clis[[1]]),length(clis[[2]]))
 > cbind( c(clis[[1]], rep(NA, mv - length(clis[[1]]) )),
          c(clis[[2]], rep(NA, mv - length(clis[[2]]) )) )
               [,1]        [,2]
  [1,] -0.561558774  0.44756791
  [2,] -1.226817284 -0.24501794
  [3,] -0.333583965 -0.07643339
  [4,]  0.006174515  1.12304951
  [5,]  0.246559481  1.58075036
  [6,]           NA -0.82786133
  [7,]           NA  0.49121165
  [8,]           NA  0.01857698
  [9,]           NA  1.32094819
[10,]           NA  0.93023074