Добро пожаловать в R! В R бинарный оператор %%
вычисляет остаток от деления, и он векторизован, как и большинство других бинарных операторов в R. Вы можете сделать это, чтобы получить элементы вектора, которые делятся на 2:
# The remainders
x_remainders <- xVec %% 2
# Get elements of xVec that is divisible by 2
x_div2 <- x[x_remainders == 0]
# Get indices within xVec where the element is divisible by 2
ind_x_div2 <- which(x_remainders == 0)
Надеюсь, это поможет. str_detect
, возможно, не лучший способ сделать это, поскольку вы работаете с числами, а не со строками.