如何循环一个大矩阵并在R中快速提取值？

Question

使用大小为Toast.makeText(getApplicationContext(), ((TextView) view.findViewbyId(R.id.txtMsg)).getText(), Toast.LENGTH_SHORT).show();的矩阵docword：

4212 * 5000

我有两个长向量：0 0 3 1 4 0 1 1 2 0 0 1 ..... 和docids：

wordids

我想迭代矩阵来存储这样的数据：

len <- sum(docword)
docids <- array(dim=len)
wordids <- array(dim=len)

因此，n = 1 for (i in 1:dim(docword)[1]){ for (j in 1:dim(docword)[2]){ for (val in 1:docword[i,j]){ #for each word wordids[n] <- j #store the word id docids[n] <- i #store the doc id n = n+1 } } } 和wordids的预期输出应为：

docids

我想知道有没有更快的方法来完成同样的任务？谢谢！