r - 如何编写一个 R 函数或循环来打印 [1, 100] 中的每第三个数字或第 n 个数字？

Question

我正在尝试在 R 中编写一个函数，它将打印 [1,100] 中的每个第三个数字；这是我尝试过的，但这不会产生每三个数字，而是产生每一个数字

x <- c(100)
question.1 <- function (x){
out <- seq(x)
 return(out)
}
question.1(x)

我错过了什么吗？您能提供的任何帮助将不胜感激!

Answer 1

使用模运算符 (%%) 获取从 1:100 开始的每个第 n 个值，如下所示:

nth <- function(x,n){
  x[x%%n==0]
}

例如:

x <- 1:100
nth(x,7)
[1]  7 14 21 28 35 42 49 56 63 70 77 84 91 98