在R中存储/制作稀疏向量

Question

我生成的稀疏矢量长度> 50,000。我在for循环中生成它。我想知道是否有一种存储零的有效方法？

基本上代码看起来像

score = c()
for (i in 1:length(someList)) {
score[i] = getScore(input[i], other_inputs)
if (score[i] == numeric(0))
score[i] = 0    ###I would want to do something about the zeros
}

Answer 1

此代码无效。您应该在循环之前预先分配分数向量大小。预分配还将创建一个带零的向量。因此，无需分配零值，您只能从getScore函数中分配数值结果。

N <- length(someList)  ## create a vector with zeros
score = vector('numeric',N)
for (i in 1:N) {
  ss <- getScore(input[i], other_inputs)
  if (length(ss)!=0)
    score[i] <- ss  
}