R余数函数,提取特定值

时间:2013-01-22 00:43:40

标签: r function vector extract modulo

我正在努力在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的所有值,因为那些表示没有余数存在。我不知道如何去做...

1 个答案:

答案 0 :(得分:4)

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

你想通过一个函数做什么特别的原因?否则你可以做到

x[x%%3==0]