根据 R 中另一列的值对列中的值进行分组

Question

我有一个 dataframe，我希望第二列中的所有值在第一列中具有相同值时存储在一起。 困难之一是仅当有多个值时才将这些值放在引号中并用分号分隔。

A   12
A   56
A   23
B   16
C   04
C   73

结果是这样的：

A   "12;56;23"
B   16
C   "04;73"

我看到 tydir 的 function fill() 允许做或多或少与我想要的相反的事情，但我不知道任何 function 能够做到这一点。 如果能给我一些线索，谢谢！

Answer 1

我们可以在分组后使用paste with collapse

aggregate(col2 ~ col1, df1, \(x) 
    if(length(x) > 1) dQuote(paste(x, collapse =";"), FALSE) else x)

-输出

 col1       col2
1    A "12;56;23"
2    B         16
3    C     "4;73"

数据

df1 <- structure(list(col1 = c("A", "A", "A", "B", "C", "C"), col2 = c(12L, 
56L, 23L, 16L, 4L, 73L)), class = "data.frame", row.names = c(NA, 
-6L))