¿Cómo puedo satisfacer mis problemas con el operador `:` de R? operador

Question

de R : tiene algunas trampas conocidas:

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

tan sólo pudiera escribir una función que resuelve este haciendo 1:0 dar una vector vacío, pero yo preferiría que hubo un tiempo razonablemente breve base o el paquete CRAN que proporcionó dicha función (idealmente reemplazando : si eso no es demasiado peligroso). Intenté buscar uno pero no puedo encontrarlo.

¿Existe tal cosa?

Answer 1

Prueba esto:

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

Tenga en cuenta que seq(1, length = n) funciona tan bien.