R余数函数，提取比值

Question

我正在用R编写一个函数，该函数给出数值索引向量，其中向量除以没有余数的数字列在结果向量中。

这就是我到目前为止

myfunction <-function(x,d)
{ 
    {y<- x%%d 
    return(y)}
}

如果输入：

myfunction(x=2:12,d=3)

结果显示为：

[1] 2 0 1 2 0 1 2 0 1 2 0

就目前而言，我正在尝试提取所有值为0的值，因为这些值表明不存在余数。我不知道该怎么做...

Answer 1

myfunction <- function(x,d) which(x%%d==0)
x <- 2:12
x[myfunction(x,3)]

您要通过函数执行此操作的任何特定原因？否则你可以做

x[x%%3==0]