[問題] 質數尋找

[SleepyChink (SleepyChink)]

請問,
我的語法完成後
解果只有將2-200印出200次給我，並沒有順利顯示出質數，為何會這樣呢?
x <- seq(2,200,1)
i<-1
done<-FALSE
while(!done){

if(x[i]%%(2:(x[i]-1))!=0){
      print(x)

}



if(x[i]==200){
done<-TRUE
}
i<-i+1
}




--
Sent from my Windows

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 59.113.80.32
※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1446295518.A.415.html
推 Carollax: print(x)的地方改成print(x[i])
→ Carollax: 你x沒有下index就會整串x都跑出來
推 ritajen: 改成x[i] 之後 得到的數列並非全部是質數。
推 Carollax: if(all(x[i]%%(2:(x[i]-1))!=0))
→ SleepyChink: 這樣的結果列出來少一個2
→ Carollax: if(sum(x[i]%%(1:x[i])==0)==2)
→ Carollax: 質數定義: 一個自然數若恰有兩個正因數 稱為質數
→ Carollax: 你可以思考一下自己的條件式跟這段定義的差異在哪