我如何连接(合并，组合)两个值? 例如，我有:
tmp = cbind("GAD", "AB")
tmp
# [,1] [,2]
# [1,] "GAD" "AB"
我的目标是将“tmp”中的两个值连接到一个字符串:
tmp_new = "GAD,AB"
哪个函数可以帮我做这个?
当前回答
或者，如果你的目标是直接输出到文件或标准输出，你可以使用cat:
cat(s1, s2, sep=", ")
其他回答
正如其他人所指出的，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
考虑这样一种情况，字符串是列，结果应该是一个新列:
df <- data.frame(a = letters[1:5], b = LETTERS[1:5], c = 1:5)
df$new_col <- do.call(paste, c(df[c("a", "b")], sep = ", "))
df
# a b c new_col
#1 a A 1 a, A
#2 b B 2 b, B
#3 c C 3 c, C
#4 d D 4 d, D
#5 e E 5 e, E
如果需要粘贴所有列，可以跳过[c("a"， "b")]子设置。
# you can also try str_c from stringr package as mentioned by other users too!
do.call(str_c, c(df[c("a", "b")], sep = ", "))
或者，如果你的目标是直接输出到文件或标准输出，你可以使用cat:
cat(s1, s2, sep=", ")
