不需要用which函数。这样就可以：


x1 <- round(runif(100, min=80, max=100))
fx <- function (x1){
  
  for(i in 1:length(x1)){
    if (x1[i]==80)
      print(i)
  }

}
fx(x1)

我个人更喜欢这种方式，因为向量输出方便处理：


x1 <- round(runif(100, min=80, max=100))
fx <- function (x1){
  temp <- rep(0,length(x1))
  for(i in 1:length(x1)){
    if (x1[i]==80)
       temp[i] <- 1
  }
  temp
}
fx(x1)
temp2 <- seq(1,length(x1))
temp3 <- temp2*fx(x1)
position <- temp3[temp3 !=0];position

还是有点不明白                                                                        
                                       
                                                     
                                                     
                                             
                                                                 
                                                                                 

x1 <- round(runif(100, min=80, max=100))
which(x1 == 80)
[1] 10 25 69

恩恩，我后来也自己发现了，直接用which(x1)==80 就行了，但是x1不应该是一组数么，为什么直接which(x1)就行。。。