R语言,解释下这code>Eratosthenes 2) {+ sieve

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/05 20:01:14
R语言,解释下这code>Eratosthenes 2) {+ sieve

R语言,解释下这code>Eratosthenes 2) {+ sieve
R语言,解释下这code
>Eratosthenes 2) {
+ sieve

R语言,解释下这code>Eratosthenes 2) {+ sieve
if (any(sieve ==i)) { # 如果i在sieve里 也可以写成 if ( i %in% sieve ) {
  primes <- c(primes, i)   # 把i放到prime里
  sieve <- c(sieve[(seive %% i) != 0], i)  #把所有sieve里i的整数倍数(除了i)取走
  # %%是mod, 余数,所以 sieve[seive%%i) !=0]是所有seive里除以i余数不为0的数
}
 
整个这段代码是找出所有比n小的质数