[問題] 質數尋找

作者: SleepyChink (SleepyChink)   2015-10-31 20:45:16
請問,
我的語法完成後
解果只有將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
}
作者: Carollax (更更)   2015-10-31 21:20:00
print(x)的地方改成print(x[i])你x沒有下index就會整串x都跑出來
作者: ritajen (asdfge)   2015-10-31 21:38:00
改成x[i] 之後 得到的數列並非全部是質數。
作者: Carollax (更更)   2015-10-31 21:55:00
if(all(x[i]%%(2:(x[i]-1))!=0))
作者: SleepyChink (SleepyChink)   2015-11-01 02:46:00
這樣的結果列出來少一個2
作者: Carollax (更更)   2015-11-01 06:42:00
if(sum(x[i]%%(1:x[i])==0)==2)質數定義: 一個自然數若恰有兩個正因數 稱為質數你可以思考一下自己的條件式跟這段定義的差異在哪

Links booklink

Contact Us: admin [ a t ] ucptt.com