我如何连接(合并,组合)两个值? 例如,我有:

tmp = cbind("GAD", "AB")
tmp
#      [,1]  [,2]
# [1,] "GAD" "AB"

我的目标是将“tmp”中的两个值连接到一个字符串:

tmp_new = "GAD,AB"

哪个函数可以帮我做这个?


当前回答

正如其他人所指出的,paste()是正确的方法。但是每次需要使用非默认分隔符时,都必须输入paste(str1, str2, str3, sep= "),这很烦人。

您可以非常容易地创建包装器函数,使工作变得更加简单。例如,如果你发现自己经常连接没有分隔符的字符串,你可以这样做:

p <- function(..., sep='') {
    paste(..., sep=sep, collapse=sep)
}

或者如果你经常想从一个向量连接字符串(比如PHP中的implode()):

implode <- function(..., sep='') {
     paste(..., collapse=sep)
}

允许你这样做:

p('a', 'b', 'c')
#[1] "abc"
vec <- c('a', 'b', 'c')
implode(vec)
#[1] "abc"
implode(vec, sep=', ')
#[1] "a, b, c"

此外,还有内置的paste0,它做的事情与我的implode相同,但不允许自定义分隔符。它比paste()稍微高效一些。

其他回答

另一个非粘贴的答案:

x <- capture.output(cat(data, sep = ","))
x
[1] "GAD,AB"

在哪里

 data <- c("GAD", "AB")
> tmp = paste("GAD", "AB", sep = ",")
> tmp
[1] "GAD,AB"

我从谷歌中通过搜索R个串联字符串找到了这个:http://stat.ethz.ch/R-manual/R-patched/library/base/html/paste.html

给定你创建的矩阵tmp:

paste(tmp[1,], collapse = ",")

我假设有一些原因,为什么你创建一个矩阵使用cbind,而不是简单地:

tmp <- "GAD,AB"
paste()

才是正确的选择。正如之前的海报所指出的,粘贴可以做两件事:

将值串联成一个“字符串”,例如:

> paste("Hello", "world", sep=" ")
[1] "Hello world"

其中参数sep指定在参数之间用于连接的字符, 或者折叠字符向量

> x <- c("Hello", "World")
> x
[1] "Hello" "World"
> paste(x, collapse="--")
[1] "Hello--World"

其中参数collapse指定要折叠的vector元素之间使用的字符。

你甚至可以将两者结合起来:

> paste(x, "and some more", sep="|-|", collapse="--")
[1] "Hello|-|and some more--World|-|and some more"

Help.search()是一个方便的函数,例如:

> help.search("concatenate")

将引导您粘贴()。