如果我有一个类型字符的向量,我怎么能连接到字符串的值?下面是我如何使用paste():

sdata = c('a', 'b', 'c')
paste(sdata[1], sdata[2], sdata[3], sep ='')

产生“abc”。

当然,这只有在我提前知道sdata的长度时才有效。


当前回答

标准库stringr有一些快速的方法可以实现这一点。

str_flatten

默认情况下将折叠你的字符向量,不带空格,但也有collapse参数:

str_flatten(sdata)
[1] "abc"

str_c

类似于paste,你需要指定一个collapse参数来实现:

str_c(sdata, collapse = "")
[1] "abc"

基地:paste0

虽然与粘贴相比,这里没有明显的优势,但您可以使用基于R的paste0(sdata, collapse = "")。


在我的机器上更新一个更长的字符串向量的基准测试结果如下:

set.seed(4)
x <- sample(letters, 1E6, replace = T)
microbenchmark(stri_paste(x, collapse=''), 
               paste(x,collapse=''), 
               do.call(paste, c(as.list(x), sep="")),
               stringr::str_flatten(x),
               stringr::str_c(x, collapse = ""),
               paste0(x, collapse = ""))

Unit: milliseconds
                                    expr      min        lq       mean     median        uq       max neval cld
            stri_paste(x, collapse = "")  21.1788  21.80040   23.45225   22.78430   24.4271   39.1305   100 a  
                 paste(x, collapse = "") 110.7734 114.36595  126.43277  119.02755  136.5902  187.4112   100  b 
 do.call(paste, c(as.list(x), sep = "")) 538.8329 981.80345 1090.51738 1096.33470 1213.8848 1457.5622   100   c
                 stringr::str_flatten(x)  20.6276  21.60610   23.36241   22.73915   24.2210   42.3481   100 a  
        stringr::str_c(x, collapse = "")  20.9274  21.74285   23.75466   22.73950   24.3254   36.6114   100 a  
                paste0(x, collapse = "") 110.0614 112.81175  124.15555  116.96610  130.6330  168.7199   100  b 

同样本着肯·威廉姆斯回答的精神:

Reduce(paste0, sdata)
[1] "abc"

其他回答

尝试在paste函数中使用一个空的折叠参数:

粘贴(sdata, collapse = ")

感谢http://twitter.com/onelinetips/status/7491806343

标准库stringr有一些快速的方法可以实现这一点。

str_flatten

默认情况下将折叠你的字符向量,不带空格,但也有collapse参数:

str_flatten(sdata)
[1] "abc"

str_c

类似于paste,你需要指定一个collapse参数来实现:

str_c(sdata, collapse = "")
[1] "abc"

基地:paste0

虽然与粘贴相比,这里没有明显的优势,但您可以使用基于R的paste0(sdata, collapse = "")。


在我的机器上更新一个更长的字符串向量的基准测试结果如下:

set.seed(4)
x <- sample(letters, 1E6, replace = T)
microbenchmark(stri_paste(x, collapse=''), 
               paste(x,collapse=''), 
               do.call(paste, c(as.list(x), sep="")),
               stringr::str_flatten(x),
               stringr::str_c(x, collapse = ""),
               paste0(x, collapse = ""))

Unit: milliseconds
                                    expr      min        lq       mean     median        uq       max neval cld
            stri_paste(x, collapse = "")  21.1788  21.80040   23.45225   22.78430   24.4271   39.1305   100 a  
                 paste(x, collapse = "") 110.7734 114.36595  126.43277  119.02755  136.5902  187.4112   100  b 
 do.call(paste, c(as.list(x), sep = "")) 538.8329 981.80345 1090.51738 1096.33470 1213.8848 1457.5622   100   c
                 stringr::str_flatten(x)  20.6276  21.60610   23.36241   22.73915   24.2210   42.3481   100 a  
        stringr::str_c(x, collapse = "")  20.9274  21.74285   23.75466   22.73950   24.3254   36.6114   100 a  
                paste0(x, collapse = "") 110.0614 112.81175  124.15555  116.96610  130.6330  168.7199   100  b 

同样本着肯·威廉姆斯回答的精神:

Reduce(paste0, sdata)
[1] "abc"

马特的答案绝对是正确的。然而,为了减轻喜剧效果,这里有一个替代方案:

do.call(paste, c(as.list(sdata), sep = ""))

sdata:

gsub(", ", "", toString(sdata))

对于整数向量:

gsub(", ", "", toString(c(1:10)))

马特·特纳的答案绝对是正确的。然而,在Ken Williams回答的精神中,你也可以这样做:

capture.output(cat(sdata, sep=""))