要求是写一个函数function(type,attribute) type就是iris这个数据集里的Species, attribute就是长啊宽啊那些的，输入这个函数，自动把这个type里的这个attribute中最大最小值输出来。我现在大概思路是这样：

irisfilter<- function(type,attribute){
  #attach(iris)
  setosa<-subset(iris,Species=='setosa')
  versicolor<-subset(iris,Species=="versicolor")
  virginica<-subset(iris,Species=="virginica")

  if (type =='setosa'){

    if(attribute=='Sepal.Length'){
      max<-max(seota$Sepal.Length)
      list(max=max)


   }
    else if(attribute==Sepal.Width){

    }
    else if(attribute==Petal.Length){

    }
    else if(attribute==Petal.Width){


    }
    list("test")

  }

}

但是现在的问题就是运行函数，什么结果都没有，等于第一个if判断就没进去，求好心人士解答问题出在哪。。。