如何用R调用gemtc包和JAG，构建随机效应模型，做基于贝叶斯模型的网状Meta分析？(关键词-network)

用R调用gemtc包和JAG，构建随机效应模型，做基于贝叶斯模型的网状Meta分析

代码如下：

library(coda)
library(gemtc)
library("rjags")
setwd("D:\\R.DATA")
data1 <- read.table("PFS1.txt", sep="\t", header=T)
data2 <- read.table("PFS2.txt", sep="\t", header=T)
network <- mtc.network(data.re=data1,description="Example", treatments=data2)
pdf("network.pdf")
plot(network)
dev.off()
model<-mtc.model(network,type="consistency", factor = 2.5,n.chain=3,likelihood="binom",link="cloglog",linearModel="random")

报错内容 ：
Error in mtc.model(network, type = "consistency", factor = 2.5, n.chain = 3, :
Network is disconnected - see plot(network)

img

想请问这个报错怎么解决呢？