创建具有多个参数的函数

Question

> Test
    param1  param2  param3
1   300      78      98
2   357      539     NA
3   4859     NA      NA

因此，想象一下我有一个像这样的数据帧。我想编写一个函数，它将以下参数作为参数：变量名称作为字符串，数据作为data.frame，以及每个响应者的最大NA答案数。

因此该函数可以按照

的方式工作

test1<-test_function(c("param2", "param3"), data = Test, max_NA = 1)

它会返回类似的内容：

   test1    
1  78 + 98            
2   539           
3   NA          

在此先感谢，非常感谢任何帮助：）

Answer 1

test_function = function(df, Columns, ...){
  rowSums(df[, Columns], ...)
}

Columns = c("param2", "param3")

> test_function(df, Columns)
  1   2   3 
176  NA  NA 
> test_function(df, Columns, na.rm = T)
  1   2   3 
176 539   0