Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/64.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R简单等价于strcat_R - Fatal编程技术网

R简单等价于strcat

R简单等价于strcat,r,R,我想要一种将字符串数组连接成单个字符串的方法 有没有比下面的“paste.c”函数更基本的方法来连接数组中的值 paste(1,2,3) # result: "1 2 3" paste(c(1,2,3)) # result: "1" "2" "3", analogous to Unix 'paste' result paste.c <- function(y) { as.character( tapply( X = y,

我想要一种将字符串数组连接成单个字符串的方法

有没有比下面的“paste.c”函数更基本的方法来连接数组中的值

paste(1,2,3)    # result: "1 2 3"
paste(c(1,2,3)) # result: "1" "2" "3", analogous to Unix 'paste' result
paste.c <- function(y) {
    as.character(
        tapply( X        = y, 
                INDEX    = rep.int(1, length(y)), 
                FUN      = paste, 
                sep      = "", 
                collapse = ""
        )
    )
}
paste.c(c(1,2,3)) # result: "123", which is what I need at the moment
paste(1,2,3)#结果:“1,2,3”
粘贴(c(1,2,3))#结果:“1”“2”“3”,类似于Unix的“粘贴”结果
粘贴.c如何:

  paste(c(1,2,3), collapse = '')

如果经常使用
paste.c
paste(1,2,3,sep=“”)