Jak mogę zaspokoić moje nieszczęścia za pomocą operatora R `:`?

Question

Operator

R : ma kilka dobrze znanych gier:

a = c(1, 2, 3) 
set.zero = function(n) a[1:n] <<- 0 
set.zero(0) 
# `a` is now c(0, 2, 3) 

Mogłem po prostu napisać funkcję, która rozwiązuje to przez uczynienie 1:0 pustym wektorem , ale wolałbym, gdyby był dość zwięzły base lub Pakiet CRAN , który dostarczył taką funkcję (najlepiej zastępując :, jeśli nie jest to niebezpieczne ). Próbowałem go znaleźć, ale nie mogę go znaleźć.

Czy coś takiego istnieje?

Answer 1

Spróbuj tego:

set.zero = function(n) a[seq_len(n)] <<- 0 

Zauważ, że seq(1, length = n) działa tak samo.