基于列A合并R中的多行

我正在总结一个包含7000多个非数字值的巨大数据帧

下面是一个我试图用数据做的例子

人 描述 首字母 位置 满意的 信息1 JK 火星 满意的 信息2 JK 木星 山姆 信息1 服务提供商 土星 山姆 信息2 服务提供商 土 山姆 信息3 服务提供商 火星

---

您可以使用摘要、粘贴和折叠：

test%
分组人（个人，姓名首字母）%>%
摘要（Description=粘贴（Description，collapse=“，”），
位置=粘贴（位置，折叠=“，”）
#>`summary（）`按'Person'重新分组输出（用'.groups'参数重写）
#>#A tibble:2 x 4
#>#组：人[2]
#>人员姓名首字母描述位置
#>                                  
#>杰克JK信息1，信息2火星，木星
#>2 Sam SP Info1、Info2、Info3土星、地球、火星

---

但是请注意，您基本上是在使数据“不整洁”…

您可以使用

aggregate（）

：

~

右侧的变量是分组变量，

表示“测试”数据框中的所有其他变量。其他传递的参数

paste（）

和

collapse

随后用于分组数据

聚合（.~Person+首字母缩写、测试、粘贴、折叠=“；”）
##人员姓名首字母描述位置
##1 Jake JK Info1；信息2火星；木星
##2 Sam SP Info1；信息2；信息3土星；地球；火星

它产生的结果与另一个建议的解决方案相同：

res_Tjebo%
分组人（个人，姓名首字母）%>%
摘要（Description=粘贴（Description，collapse=“，”），
位置=粘贴（位置，折叠=“，”）%%>%
解组（）
res_jwarz%
聚合(
.~人+首字母，
., 
粘贴，折叠“”，“”%>%
作为_tible（）
完全相同（res_Tjebo，res_jwarz）
##[1]是的

谢谢您的帮助。不幸的是，此方法产生粘贴单元格的数字长度，而不是实际的文本信息。我不知道你的意思，但我很高兴你找到了一个有效的解决方案：）。非常感谢！这种方法非常有效。我完全忘了tiddyverse。我感谢你的帮助