R函数中的可选子集

Question

我有一个数据框如下

    individual  species   Pdays ... Gdays 
1   alpha       opuntia   4         9
2   alpha       physalis  4         10
3   beta        opuntia   3         9
4   beta        physalis  5         8

个人和物种是绝对因素。我正在尝试编写一个函数，我可以在其中查看物种的效果，以及个人的OPTIONALLY。我无法弄清楚如何选择性地个体化。到目前为止，我有：

 seed_germination <- function (dataframe, species, individual) {
    mydata <- read.table(dataframe, header = TRUE, sep = ",")
    attach(mydata)

 subset_mydata <- mydata[mydata$species == species, ] 

 subset_ind <- subset_mydata[subset_mydata$individual == individual, ]                   
    #ignored if individual not specified

    }

 test <- seed_germination(dataframe = 'test.csv', species = 'opuntia',                    
       individual = 'alpha')

我玩过

  if(missing(individual))
      return()

以各种方式回报（）无济于事。

我接近这个错误吗？