我正在从光栅文件中提取数据。我只需要提取 1000 个细胞的随机样本,如下所示:
pr <- brick(filename[i], varname=var[i], na.rm=T)
cells <- sampleRandom(pr[[1]], 1000, cells=T)
prvals <- pr[cells[,1]] #Equivalent of extract(pr, cells[,1])
我想使用更多的内核来加速这个过程,就像这样:
beginCluster(4)
pr <- brick(filename[i], varname=var[i], na.rm=T)
cells <- sampleRandom(pr[[1]], cnsample, cells=T)
prvals <- clusterR(pr, extract, args=list(cells[,1]))
endCluster()
但是,该clusterR()
行向我抛出了各种错误,例如:
prvals <- clusterR(pr, extract, args=list(cells[,1])) checkForRemoteErrors(lapply(cl, recvResult)) 中的错误:4 个节点产生错误;第一个错误:参数长度为零
prvals <- clusterR(pr, extract, args=list(cells[,1])) checkForRemoteErrors(lapply(cl, recvResult)) 中的错误:2 个节点产生错误;第一个错误:参数长度为零
prvals <- clusterR(pr, extract, args=list(cells[,1])) checkForRemoteErrors(lapply(cl, recvResult)) 中的错误:3 个节点产生错误;第一个错误:参数长度为零
prvals <- clusterR(pr, extract, args=list(cells[,1])) ClusterR(pr, extract, args = list(cells[, 1])) 中的错误:集群错误另外:有 11 个警告(使用 warnings() 来查看它们)
prvals <- clusterR(pr, extract, args=list(cells[,1])) checkForRemoteErrors(lapply(cl, recvResult)) 中的错误:3 个节点产生错误;第一个错误:参数长度为零另外:警告消息:关闭未使用的连接 9 (/tmp/R_raster_tmp/afantini/raster_tmp_2014-11-28_131043_31528.gri)
怎么了?
编辑:我尝试了raster
文档中的示例,它们在另一台机器上工作,但在这台机器上却没有。所以这台机器存在更深层次的问题。包 snow 已正确安装。R 是最新版本。