R中的組合子集？

Question

我嘗試子集3 y s當x s是-1，0和1在我的代碼如下。但我希望一次使用y[c(x == -1, x == 0, x == 1)]，這顯然不起作用（見下文）。

任何更好的方法來一次完成這個子集？

x = seq(-1, 1, l = 1e4) 
y = dcauchy(x, 0, sqrt(2)/2) 
y[c(x == -1, x == 0, x == 1)] ## This subsetting format doesn't work 

Answer 1

我們可以做到這一點。

y[x == -1| x == 0| x == 1] 

或者這

y[x %in% c(-1, 0, 1)]