我有一个矩阵" a"以下类型:
2015-02-21
我想得到一个矩阵" b"看起来像这样:
a<-matrix(c(1,"ich esse", 1, "gerne bananen", 1, "dazu auch einen apfel", 2, "ich mag brezen", 2, "mit butter"), nrow=5, ncol=2, byrow = TRUE )
答案 0 :(得分:2)
dplyr
library(dplyr)
a <- as.data.frame(a)
names(a) <- c('group', 'text')
a %>%
group_by(group) %>%
summarise(text2 = paste(text, collapse = " ")) %>%
as.matrix()
答案 1 :(得分:1)
这是另一种解决方案:
library(data.table)
library(stringr)
a<-matrix(c(1,"ich esse", 1, "gerne bananen", 1, "dazu auch einen apfel", 2, "ich mag brezen", 2, "mit butter"), nrow=5, ncol=2, byrow = TRUE )
d<- as.data.table(a)
d[,str_c(V2,collapse=' '),by=V1]
# V1 V1
#1: 1 ich esse gerne bananen dazu auch einen apfel
#2: 2 ich mag brezen mit butter