将一个向量输入if（）会导致问题吗？

Question

我已经创建了这个函数，它可以选择子集数据帧：

irisSubset <- function(dataframe, Subset=FALSE){

  df <- dataframe

  if(Subset != FALSE) {
    df <- subset(df, Species %in% Subset)
  }

  df

}


irisSubset(iris, Subset = c("setosa"))
irisSubset(iris, Subset = c("setosa", "versicolor"))
irisSubset(iris)

该功能完成了我想要它做的事情。但是，我意识到我已经向if（）提供了一个向量，这会导致一条警告消息。是否存在上述功能无法正常工作的情况？有没有办法改进功能并避免警告信息？