我怎样才能用 R 的 `:` 运算符来解决我的问题？

Question

R 的: 运算符有一些众所周知的陷阱：

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

我可以写一个函数来解决这个问题，让1:0 给一个空 矢量，但如果有一个相当简洁的base 或 CRAN，我会更喜欢它 提供这种功能的包（如果不是的话，最好替换: 危险的）。我试图搜索一个，但找不到它。

这样的事情存在吗？

Answer 1

试试这个：

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

请注意，seq(1, length = n) 也可以。