老师我想问一下,MENA在analysis the network 报错的问题

This is your first time to run parameter calculations on soil20231205 at 0.890 threshold. It will take a few minutes...
R project wrong! Please report web administrator.

setwd("D:/wwwroot/MENA/datasets/196868ld/1701851366")
library(sna)
cor.data<-read.table("soil20231205 Pearson Correlation_0.890 4 R.txt",sep="\t")
cor.matrix<-as.matrix(cor.data)

node.degree = degree(cor.matrix,cmode="indegree")
node.betw = betweenness(cor.matrix,cmode="undirected")
node.stress = stresscent(cor.matrix,cmode="undirected")
node.evcent = evcent(cor.matrix,gmode="graph")

rep.table = cbind(node.degree, node.betw, node.stress, node.evcent)
row.names(rep.table) = c("OTU1","OTU10","OTU100","OTU1001","OTU1006","OTU1011","OTU1015","OTU1035","OTU1039","OTU1046","OTU1048","OTU105","OTU1053","OTU1055","OTU1059","OTU106","OTU1064","OTU107","OTU1070","OTU1077","OTU1081","OTU1082","OTU109","OTU1090","OTU1094","OTU1098","OTU1099","OTU11","OTU111","OTU1110","OTU1112","OTU1118","OTU112","OTU1126","OTU1134","OTU1139","OTU114","OTU1141","OTU1146","OTU1148","OTU115","OTU1155","OTU116","OTU1166","OTU118","OTU1184","OTU1185","OTU119","OTU12","OTU120","OTU121","OTU1214","OTU1217","OTU1219","OTU122","OTU1220","OTU1227","OTU123","OTU1234","OTU1236","OTU124","OTU1246","OTU125","OTU1250","OTU1255","OTU126","OTU1265","OTU127","OTU1273","OTU1277","OTU128","OTU1288","OTU129","OTU13","OTU1302","OTU131","OTU1318","OTU132","OTU1327","OTU133","OTU1339","OTU135","OTU136","OTU137","OTU1374","OTU1376","OTU138","OTU1388","OTU139","OTU14","OTU140","OTU1400","OTU1414","OTU142","OTU1432","OTU1434","OTU1438","OTU145","OTU1458","OTU1459","OTU1460","OTU1467","OTU147","OTU1476","OTU149","OTU1493","OTU1494","OTU15","OTU150","OTU1514","OTU1518","OTU152","OTU1524","OTU1533","OTU1538","OTU154","OTU1547","OTU1549","OTU155","OTU156","OTU1572","OTU1576","OTU158","OTU1587","OTU159","OTU1597","OTU1608","OTU161","OTU1611","OTU162","OTU1621","OTU1626","OTU1634","OTU1635","OTU164","OTU1647","OTU165","OTU166","OTU1662","OTU1667","OTU1672","OTU1674","OTU1680","OTU1689","OTU170","OTU1701","OTU1703","OTU1704","OTU1712","OTU1715","OTU1718","OTU172","OTU1750","OTU177","OTU1772","OTU180","OTU1801","OTU181","OTU182","OTU183","OTU1835","OTU184","OTU185","OTU1873","OTU189","OTU190","OTU1902","OTU1906","OTU1914","OTU1916","OTU192","OTU1920","OTU193","OTU1943","OTU196","OTU199","OTU2","OTU2004","OTU2010","OTU2034","OTU204","OTU205","OTU2050","OTU206","OTU2062","OTU2064","OTU207","OTU208","OTU209","OTU2099","OTU210","OTU211","OTU2115","OTU212","OTU2120","OTU213","OTU215","OTU2167","OTU2172","OTU2176","OTU218","OTU219","OTU22","OTU221","OTU222","OTU223","OTU224","OTU228","OTU229","OTU23","OTU231","OTU232","OTU233","OTU234","OTU236","OTU237","OTU239","OTU24","OTU242","OTU243","OTU245","OTU246","OTU249","OTU25","OTU250","OTU253","OTU255","OTU256","OTU259","OTU26","OTU260","OTU261","OTU263","OTU264","OTU267","OTU269","OTU270","OTU273","OTU274","OTU275","OTU277","OTU278","OTU28","OTU280","OTU281","OTU285","OTU288","OTU290","OTU291","OTU292","OTU293","OTU294","OTU295","OTU296","OTU298","OTU299","OTU3","OTU30","OTU300","OTU301","OTU305","OTU309","OTU31","OTU311","OTU313","OTU314","OTU315","OTU317","OTU32","OTU320","OTU324","OTU326","OTU327","OTU329","OTU33","OTU332","OTU333","OTU334","OTU335","OTU337","OTU338","OTU339","OTU34","OTU340","OTU341","OTU344","OTU345","OTU353","OTU355","OTU356","OTU360","OTU362","OTU364","OTU366","OTU367","OTU37","OTU372","OTU373","OTU374","OTU375","OTU378","OTU38","OTU381","OTU382","OTU383","OTU384","OTU385","OTU386","OTU387","OTU388","OTU389","OTU39","OTU390","OTU396","OTU397","OTU4","OTU40","OTU406","OTU407","OTU408","OTU411","OTU412","OTU416","OTU418","OTU42","OTU422","OTU423","OTU424","OTU425","OTU427","OTU43","OTU436","OTU438","OTU439","OTU446","OTU447","OTU448","OTU45","OTU450","OTU451","OTU453","OTU459","OTU460","OTU461","OTU463","OTU464","OTU468","OTU471","OTU473","OTU479","OTU48","OTU480","OTU481","OTU482","OTU49","OTU492","OTU496","OTU497","OTU498","OTU5","OTU50","OTU502","OTU503","OTU504","OTU508","OTU51","OTU511","OTU512","OTU513","OTU515","OTU516","OTU517","OTU52","OTU520","OTU526","OTU529","OTU53","OTU530","OTU54","OTU542","OTU545","OTU547","OTU552","OTU553","OTU556","OTU56","OTU561","OTU563","OTU566","OTU569","OTU57","OTU571","OTU574","OTU576","OTU577","OTU579","OTU58","OTU583","OTU586","OTU587","OTU588","OTU59","OTU590","OTU595","OTU599","OTU6","OTU60","OTU601","OTU602","OTU604","OTU605","OTU607","OTU609","OTU61","OTU612","OTU614","OTU615","OTU617","OTU618","OTU624","OTU638","OTU639","OTU64","OTU646","OTU648","OTU652","OTU653","OTU657","OTU660","OTU661","OTU666","OTU668","OTU67","OTU681","OTU685","OTU686","OTU69","OTU691","OTU692","OTU694","OTU695","OTU696","OTU699","OTU7","OTU70","OTU701","OTU709","OTU712","OTU715","OTU719","OTU722","OTU723","OTU728","OTU73","OTU732","OTU736","OTU737","OTU738","OTU739","OTU74","OTU741","OTU742","OTU744","OTU745","OTU746","OTU747","OTU751","OTU752","OTU759","OTU76","OTU770","OTU772","OTU774","OTU776","OTU778","OTU779","OTU780","OTU782","OTU783","OTU784","OTU79","OTU791","OTU794","OTU8","OTU80","OTU801","OTU803","OTU81","OTU810","OTU815","OTU819","OTU82","OTU821","OTU83","OTU836","OTU839","OTU843","OTU844","OTU848","OTU849","OTU85","OTU854","OTU855","OTU857","OTU859","OTU86","OTU860","OTU863","OTU87","OTU872","OTU875","OTU878","OTU882","OTU884","OTU89","OTU9","OTU90","OTU903","OTU908","OTU913","OTU92","OTU924","OTU929","OTU931","OTU935","OTU94","OTU941","OTU95","OTU954","OTU962","OTU966","OTU970","OTU98","OTU984","OTU998")
write.table(rep.table, file="soil20231205 0.890 centrality.out", sep="\t")

centralization(cor.matrix,degree)
centralization(cor.matrix,betweenness)
centralization(cor.matrix,stresscent)
centralization(cor.matrix,evcent)

sna: Tools for Social Network Analysis
Version 2.3-2 created on 2014-01-13.
copyright (c) 2005, Carter T. Butts, University of California-Irvine
For citation information, type citation("sna").
Type help(package="sna") to get started.

Error in `rownames<-`(x, value) :
length of 'dimnames' [1] not equal to array extent
Calls: row.names<- -> row.names<-.default -> rownames<-
Execution halted

请先 登录 后评论
  • 0 关注
  • 0 收藏,316 浏览
  • 修心 提出于 2023-12-07 11:07

相似问题