索引迭代习语

时间:2012-08-10 02:20:07

标签: r iteration idioms

在迭代集合的索引值时,通常会在SO上看到以下代码:

for (i in 1:length(x)) {
  # ...
}

当集合为空时,代码行为异常,因为1:length(x)变为1:0i值为10

iterate <- function(x) {
    for (i in 1:length(x)) {
      cat('x[[', i, ']] is', x[[i]], '\n')
    }
}

> iterate(c(1,2,3))
x[[ 1 ]] is 1 
x[[ 2 ]] is 2 
x[[ 3 ]] is 3 

> iterate(c())
x[[ 1 ]] is  
x[[ 0 ]] is

我记得当x为空时我看到了一个优雅的习惯用来定义一个没有元素的序列,但我记不起来了。你用什么成语?

1 个答案:

答案 0 :(得分:12)

当您感兴趣的对象为空时,seqseq_along可以为您提供更合理的内容。

> x <- NULL
> seq(x)
integer(0)
> seq_along(x)
integer(0)
> x <- rnorm(5)
> seq(x)
[1] 1 2 3 4 5
> seq_along(x)
[1] 1 2 3 4 5