根据元素名称在字符向量中连接字符串

Question

我有一个命名的字符向量a，我想根据它们的名称将其某些元素连接起来

a <- c('item 1' = 'first_i1', 'item 1' = 'second_i2', 'item 2' = 'only_i2')
a
     item 1      item 1      item 2 
 "first_i1" "second_i2"   "only_i2" 

使用空格作为分隔符的预期结果

a_out <- c('item 1' = 'first_i1 second_i2', 'item 2' = 'only_i2')
a_out
              item 1               item 2 
"first_i1 second_i2"            "only_i2"

Answer 1

我们可以通过将分组变量用作paste'a'的names来与vector串联

tapply(a, names(a), FUN = paste, collapse = ' ')
#            item 1               item 2 
#"first_i1 second_i2"            "only_i2"