Измените значения вектора на 0 и 1

Question

Из вектора я хотел бы сделать несколько значений 0 и несколько значений 1. Это не работает, почему?

  a <- c(1,34,5,3,6,67,3,2)


a[c(1,3,5)] <- 0 # works
a[!c(1,3,5)] <- 1 # doesnt work

Должно выглядеть

   a
    [1] 0 1 0 1 0 1 1 1

Answer 1

! для логических значений. Попробуйте -

a[-c(1,3,5)] <- 1
a
#[1] 0 1 0 1 0 1 1 1

Answer 2

Можно попробовать

> +!!replace(a,c(1,3,5),0)
[1] 0 1 0 1 0 1 1 1

Answer 3

Мы можем создать логический индекс с помощью %in%

a[!seq_along(a) %in% c(1, 3, 5)] <- 1
a
#[1] 0 1 0 1 0 1 1 1