r - 参数上的 R 函数条件

Question

在使用 {dplyr} 的 R 函数中，我想根据函数的另一个参数的值更改使用的数据框。

例子 ：

library(dplyr)

iris2 <- iris

myfunction <- function(param) {
  
  result <- 
    
    if (param=="one") {
      iris } else if (param=="two") {
        iris2 }
  %>% count(Species) 

return(result)
}

myfunction(param="one")
myfunction(param="two")

标签： rdplyr

Answer 1

你很接近：

library(dplyr)

iris2 <- iris

myfunction <- function(param) {
 
 result <- if (param=="one") { iris } else if (param=="two") { iris2 } 
 result %>% count(Species) 

}

myfunction(param="one")
myfunction(param="two")