请帮助我理解...个参数在函数中是如何工作的.我正在try 将值输入到函数中，如下所示:
test_data<-function(data, ...){
pr <- list(...)
nm <- names(data)
for(i in seq_along(nm)){
if(pr == nm[i]) nm<-(nm[-i])
}
return(nm)
}
这应该将任何值传递给dots，并判断名称是否匹配，如果匹配，则从数据名称中删除名称.然而，当我这样做时，我会得到以下结果:
test_data(mtcars, 'carb')
>NULL
我应该得到:
[1] "mpg" "cyl" "disp" "hp" "drat" "wt" "qsec"
[8] "vs" "am" "gear"
不需要for循环.您可以:
注意:我没有将通过...传递的参数包装在一个列表中，而是将它们放在一个向量中.
test_data <- function(data, ...) {
pr <- c(...)
nm <- names(data)
nm[!nm %in% pr]
}
test_data(mtcars, "carb")
#> [1] "mpg" "cyl" "disp" "hp" "drat" "wt" "qsec" "vs" "am" "gear"
# Example with multiple args
test_data(mtcars, "carb", "am", "foo", "bar")
#> [1] "mpg" "cyl" "disp" "hp" "drat" "wt" "qsec" "vs" "gear"