Zwiń / połącz / połącz kolumnę z pojedynczym ciągiem oddzielonym przecinkami w każdej grupie

Chcę zagregować jedną kolumnę w ramce danych według dwóch zmiennych grupujących i oddzielić poszczególne wartości przecinkiem.

Oto niektóre dane:

data <- data.frame(A = c(rep(111, 3), rep(222, 3)), B = rep(1:2, 3), C = c(5:10))
data
#     A B  C
# 1 111 1  5
# 2 111 2  6
# 3 111 1  7
# 4 222 2  8
# 5 222 1  9
# 6 222 2 10    

„A” i „B” to zmienne grupujące, a „C” to zmienna, którą chcę zwinąć w rozdzielony przecinkamicharacter strunowy. Próbowałem:

library(plyr)
ddply(data, .(A,B), summarise, test = list(C))

    A B  test
1 111 1  5, 7
2 111 2     6
3 222 1     9
4 222 2 8, 10

ale kiedy próbowałem przekonwertować kolumnę testową nacharacter staje się tak:

ddply(data, .(A,B), summarise, test = as.character(list(C)))
#     A B     test
# 1 111 1  c(5, 7)
# 2 111 2        6
# 3 222 1        9
# 4 222 2 c(8, 10)

Jak mogę zachowaćcharacter formatować i oddzielać je przecinkiem? Na przykład wiersz 1 powinien być tylko"5,7", a nie jako c (5,7).

questionAnswers(2)

yourAnswerToTheQuestion