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

输出格式与R中的args

2 个答案: