怎么用R语言进行质数的计算

Question

我们知道，质数是一个大于1的自然数，除了1和它自己以外没有正的约数。写一个R函数prime(n)，找出所有小于或等于n的质数。你可以使用任何算法来寻找质数。这个程序应该怎么写啊

Answer 1

数据集不大的话用简单高效的优化朴素算法

isprime <- function(num){
    num = as.integer(num)
    if (num == 1 || num == 0){return(NULL)}
    SqrtN = sqrt(num)
    for (i in seq(2,SqrtN)){ if ( (num %% i) == 0) {return(NULL)} }
    return(num)
}
unlist(lapply(1:100, function(x) isprime(x)))