r编程寻找1000以内的质数。

可以使用以下代码来寻找1000以内的质数：

prime <- function(n) {
  if (n <= 1) {
    return(FALSE)
  }
  for (i in 2:(sqrt(n))) {
    if (n %% i == 0) {
      return(FALSE)
    }
  }
  return(TRUE)
}

primes <- c()
for (i in 2:1000) {
  if (prime(i)) {
    primes <- c(primes, i)
  }
}

print(primes)

这段代码定义了一个名为`prime`的函数，用于判断一个数是否为质数。然后使用一个循环来遍历2到1000之间的所有数，将质数存储在一个向量中，并最终输出这个向量。