[R] merge/combine data

[jim holtman]

try this:

> x <- read.table(textConnection("  user_id site_id           name
+ 1        1      11      februari
+ 2        1      11       redbook
+ 3        1      11          tips
+ 7        3       6         sleep
+ 8        3       6    monitoring
+ 9        3       6         alarm"), header=TRUE)
> closeAllConnections()
> y <- lapply(split(x, list(x$user_id, x$site_id), drop=TRUE), function(.data){
+     data.frame(user_id=.data$user_id[1], site_id=.data$site_id[1],
+         name=paste(as.character(.data$name), collapse=','))
+ })
> do.call(rbind, y)
     user_id site_id                   name
3.6        3       6 sleep,monitoring,alarm
1.11       1      11  februari,redbook,tips


On Thu, Oct 16, 2008 at 4:43 AM, Dirkheld <d.g.f.m.bollen at tue.nl> wrote:
>
> Hi,
>
> I have the following data imported from a csv file
>   user_id site_id           name
> 1        1      11      februari
> 2        1      11       redbook
> 3        1      11          tips
> 7        3       6         sleep
> 8        3       6    monitoring
> 9        3       6         alarm
>
> Which I would like to merge/combine into
>   user_id site_id           name
> 1        1      11      februari, redbook, tips
> 2        3       6         sleep, monitoring, alarm
> 3 .....
>
> So I would like to combine data from similar user_id and site_id in one line
> with a merge of the 'name'.
>
>
>
> --
> View this message in context: http://www.nabble.com/merge-combine-data-tp20009538p20009538.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> 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.
>



-- 
Jim Holtman
Cincinnati, OH
+1 513 646 9390

What is the problem that you are trying to solve?