自己编一个function, 参数为一个数据框。不知道为啥在函数里提取数据的某一列时，总是提示Error i  你是   
Error in `[.data.frame`(X, as.data.frame(X)$species == unique(as.data.frame(X)$species)[i]) :
  undefined columns selected


但是不编函数时就可以提取啊。

请高手指教！