repräsentierenden Daten in einer einzelnen Zeile pro Gruppe in R

Question

Ich muß gruppierten Daten mit verschiedenen Spalten in einer Zeile darstellen. zB:

Dataset

ID Action_Number 
1 A    
1 B 
1 C 
2 D 
2 E 

Ausgang erforderlich ist: -

1 A B C 
2 D E 

ich verschiedene Gruppe von Techniken ausprobiert haben und umsetzen, aber nicht in der Lage genaue Ausgabe zu erhalten. Bitte helfen Sie.

Answer 1

wäre die einfachste Option 'ID' zu split die 'Action_Number' sein in ein list von vector s Ausgabe

split(df1$Action_Number, df1$ID) 

Wenn wir jedoch eine data.frame/data.table benötigen, dann können dcast

library(data.table)#1.9.7+ 
dcast(setDT(df1), ID~rowid(ID), value.var = 'Action_Number') 

verwendet werden

Beachten Sie, dass rowid in der Entwick-Version von data.table zur Verfügung steht. Wenn wir also eine Version von data.table haben, die < 1.9.7 ist, dann eine Sequenz Variable erstellen und führen Sie dann die dcast

dcast(setDT(df1)[, rn := 1:.N, by = ID], ID ~ rn, value.var = 'Action_Number') 

Answer 2

Wenn Sie diese auch als Liste statt halten möchten, können Sie tun:

df = data.frame(ID=c(1, 1, 1, 2, 2), Action_Number = c('A', 'B', 'C', 'D', 'E'), stringsAsFactors = F) 

unique_IDs <- unique(df$ID) 
l = list() 
for(i in 1:length(unique_IDs)){ 
    l[[i]] <- df[df$ID == i,"Action_Number"] 
} 

die hier l gibt Ihnen:

[[1]] 
[1] "A" "B" "C" 

[[2]] 
[1] "D" "E" 

Answer 3

Mit tidyverse (dplyr und 0.123.)

tab <- readr::read_delim("ID Action_Number 
1 A 
1 B 
1 C 
2 D 
2 E", delim = " ") 

tab %>% 
    dplyr::group_by(ID) %>% 
    dplyr::mutate(rn = paste0("V", 1:n())) %>% 
    tidyr::spread(rn, Action_Number) 
#> Source: local data frame [2 x 4] 
#> Groups: ID [2] 
#> 
#>  ID V1 V2 V3 
#> * <int> <chr> <chr> <chr> 
#> 1  1  A  B  C 
#> 2  2  D  E <NA>