R语言中which 函数的使用问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

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

x1定义为80-100中100个随机数，我想取出x1中等于80的数所在的位置，因此构建了一个函数fx, 但为什么这个代码不能得到我想要的结果，求解答~~R语言初学者 求指教！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：Which R语言

不需要用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

daishen 发表于 2014-10-1 10:27
x1

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

chenliao 发表于 2014-10-3 02:00
恩恩，我后来也自己发现了，直接用which(x1)==80 就行了，但是x1不应该是一组数么，为什么直接which(x1)就 ...

还是没有理解什么是向量化

跑跑就明白了。。在R中Run

x1 <- round(runif(100, min=80, max=100))
fx <- function (x1){
  for(i in 1:length(x1)){
    zt <- grep('80',x1)
  }
  zt
}
fx(x1)
返回来的结果是[1] 86 87 95 97