#Loading libraries

library(GraphClusterAnalysis) library(igraph) library(RBGL) library(graph) library(snow) library(snowfall) library(parallel)

读取输入数据

data<-read.csv('/home/poorna/Desktop/Cluster/test',header=FALSE,sep=",") G = graph.data.frame(data,directed=FALSE)

制作群集类型

cl <- makeCluster( '172.1.30.240', type="SOCK" ) clusterExport(cl, c('data'))

results <- parLapply( cl, G, function(G) { require(GraphClusterAnalysis) require(igraph) require(RBGL) HCSClustering(G,kappa=3) } )

我尝试并行执行上面的代码，但是它抛出了以下错误`

checkForRemoteErrors（val）出错：一个节点产生错误：无法为签名'“numeric”找到函数'nodes'的继承方法''

2,5 159,5 2,100 2,858 3,100