여러 인수를 사용하여 함수 만들기

Question

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

예를 들어 데이터 프레임이 있다고 가정합니다. 다음과 같은 인수를 취하는 함수를 작성하고 싶습니다. 변수 이름은 문자 문자열로, 데이터는 data.frame으로, 최대 응답 수는 응답자 당 1입니다.

그래서 함수가

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