Re: [R] Splitting a set of vectors in a list (Solved )

From: John Kane <>
Date: Thu, 13 Mar 2008 14:53:18 -0400 (EDT)

My thanks to Henrique Dallazuanna and Phil Spector. Both solutions worked well.
Phil suggested that an alterative to my function would be
vect1 = sapply(mylist,'[[',1)
and I see that Henrique used `[` in his solution.

Can you point me to some documentation that discusses these usages. I have seen them before but I have never actually figured out how to use them.?


Problem and solutions

mylist <- list(aa=c("cat","peach" ), bb=c("dog", "apple", "iron"),
         cc = c("rabbit", "orange", "zinc", "silk"))
myfun <- function(dff) dff[1]       

vect1 <- unlist(lapply(mylist, myfun))

# Desired output

t(cbind( c("cat" , "peach" , NA, NA), bbb <- c("dog" , "apple" ,"iron", NA),
ccb <- c("rabbit" ,"orange" ,"zinc" , "silk" )))

# Phil Spector's approach

mlen = max(sapply(mylist,length))
eqlens = lapply(mylist,function(x)if(length(x) < mlen)                            

c(x,rep('',mlen-length(x))) else x),eqlens)

# "Henrique Dallazuanna" <>
# I added the t()
t(, `[`,

[[elided trailing spam]] mailing list PLEASE do read the posting guide and provide commented, minimal, self-contained, reproducible code. Received on Thu 13 Mar 2008 - 18:57:25 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Fri 14 Mar 2008 - 17:30:21 GMT.

Mailing list information is available at Please read the posting guide before posting to the list.

list of date sections of archive