[问题] 质数寻找

楼主: 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