r语言 - 粘贴中"collapse"的缩写？

Question

使用

R 中的命令 paste，我想同时使用参数sep和collapse，但你不能将collapse缩写为 coll 甚至collaps。 然而，对于其他功能，部分缩写有效。

例如：

paste(letters, colla=", ")
# [1] "a , " "b , " "c , " "d , " "e , " "f , " "g , " "h , " "i , " "j , " "k , " "l , " "m , " "n , " "o , " "p , " "q , " "r , "
[19] "s , " "t , " "u , " "v , " "w , " "x , " "y , " "z , "
paste(letters, collapse=", ")
# [1] "a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, q, r, s, t, u, v, w, x, y, z"

没有其他以 coll 开头的参数可以折叠，这会干扰部分参数匹配。

为什么我在调用paste时必须键入整个参数名称，而我不必为其他函数键入？

Answer 1

我相信

是粘贴中的...导致您必须使用精确的参数匹配。 具体来说，,collapse位于参数列表中的...之后。

示范：

f1 <- function(x, collapse) cat("collapse",collapse)
f2 <- function(..., collapse) cat("collapse",collapse)
f3 <- function(collapse, ...) cat("collapse",collapse)
> f1(c="test",1)
collapse test
> f2(1,c="test")
Error in base::cat(...) : argument "collapse" is missing, with no default
> f2(1,collapse="test")
collapse test
> f3(c="test",1)
collapse test

Answer 2

包装器函数可能会有所帮助，就像paste0

p <- function(..., s=" ", clap=NULL) {   # or whichever abbreviation you prefer. I originally had `col`, but that was dumb. 
   paste(..., sep=s, collapse=clap)
}
p0 <- function(...,  clap=NULL) {
   paste(..., sep="", collapse=clap)
}

例如：

p(c("hello", "world"), c("abc", "123"), clap="$")
# [1] "hello abc$world 123"

p0(c("hello", "world"), c("abc", "123"), clap="$")
# [1] "helloabc$world123"