Message-ID: <CAEhWdG5DmxfjkW7515VGRkaiNCfx1Ct99kRGm-v8siOa=ZnXeg@mail.gmail.com>
Date: 2011-10-23T00:34:04Z
From: Weidong Gu
Subject: Expanding rows of a data frame into multiple rows
In-Reply-To: <CAJoaRha4DBS2Ayv0r-55NSfice9PaHvo5mudNxOdY6QzKBUgig@mail.gmail.com>
This may work
obs.l<-sapply(input$observations,length)
desire.output<-data.frame(site=rep(1:6,obs.l),obs=unlist(input$observations))
Weidong Gu
On Sat, Oct 22, 2011 at 7:51 PM, Peter Meilstrup
<peter.meilstrup at gmail.com> wrote:
> The setup: I have a data frame where one column is in list mode, and
> each entry contains a vector of varying length.
> I want to expand this into a data frame with one row for each member
> of the list-mode column (the other values being replicated)
>
> For example, an example input and the desired output would be:
>
> ?input <- data.frame(site = 1:6,
> ? ? ? ? ? ? ? ? ? ? ?sector = factor(c("north", "south", "east",
> "west", "east", "south")),
> ? ? ? ? ? ? ? ? ? ? ?observations =
> I(list(c(1,2,3),c(4,3),c(),c(14,12,53,2,4),c(3),c(23))))
>
> ?desired.output <-
> ? ?data.frame(site = c(1,1,1,2,2,4,4,4,4,5,6),
> ? ? ? ? ? ? ? sector = factor(c(2,2,2,3,3,4,4,4,4,4,1,3),
> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? labels = c("east", "north", "south", "west")),
> ? ? ? ? ? ? ? observations = c(1,2,3,4,3,14,12,53,2,4,3,23))
>
> There seems like there ought to be a good (simple, fast) way to do
> this, but I've been struggling. Any ideas?
>
> ______________________________________________
> 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.
>