r - R中带有args的输出格式

Question

scorekm<-function(km, x,...)
{
    args<-list(x,...)
    m=data.frame(args)
}

我想在 R 中写一个函数，例如，当我的输入是scorekm(km, c(2,3,4), c(3,4,5)) 输出应该是

2 3 4
3 4 5

我知道我放在这里的功能是错误的，应该是什么？例如，输入scorekm(km, c(2,3,4), c(3,4,5),c(4,5,6))，输出应该是

     [,1] [,2] [,3]
[1,]  2    3    4
[2,]  3    4    5
[3,]  4    5    6

但是x函数中的参数数量是不确定的。

Answer 1

实际上，您不需要使用x arg，因此您可以将其省略

> scorekm<-function(km, ...) {
     args<-list(...)
     sapply(args, rbind)
 }

> scorekm(km, c(2,3,4), c(3,4,5), c(4,5,6))

     [,1] [,2] [,3]
[1,]    2    3    4
[2,]    3    4    5
[3,]    4    5    6

Answer 2

如果你返回这个转置，m你想要的输出就很接近了。

scorekm<-function(km, x,...)
{
  args<-list(x,...)
  m=data.frame(args)
  t(m)
}

scorekm(km,c(2,3,4), c(3,4,5))
           [,1] [,2] [,3]
c.2..3..4.    2    3    4
c.3..4..5.    3    4    5