Message-ID: <da79af330803131129l3feff84r47f69f0101ec085c@mail.gmail.com>
Date: 2008-03-13T18:29:52Z
From: Henrique Dallazuanna
Subject: Splitting a set of vectors in a list
In-Reply-To: <829153.38340.qm@web32807.mail.mud.yahoo.com>
If I understand correctly, try this:
as.data.frame(lapply(mylist, `[`, 1:max(unlist(lapply(mylist, length)))))
On 13/03/2008, John Kane <jrkrideau at yahoo.ca> wrote:
> I have a set of character vectors of uneven length
> that I have stored in a list. I can easily enough get
> any column of them using lapply but what I want is to
> be able to create a matrix of them. Other than some
> kind of brute force looping approach I have drawn a
> blank.
>
> Would somebody please suggest something? Thanks
>
> Example.
>
> 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))
>
>
> Looking for the perfect gift? Give the gift of Flickr!
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>
--
Henrique Dallazuanna
Curitiba-Paran?-Brasil
25? 25' 40" S 49? 16' 22" O