在网上查到代码做多置信区间的森林图，跑不出来，代码和报错如下:
library(forestplot) # 加载包
library(readxl) # 加载包
forest<-read_xlsx("F:/R/forest.xlsx") # 导入数据
View(forest) # 预览数据
subgps<-c(4,5,7,8,10,11,13,14,15,17,18,20,21,23,24,26,27,29,30,32,33,35,36,38,39)

指定要缩进的亚组，此处向量中的数字表示亚组的行数

forest$Variable[subgps] <- paste(" ",forest$Variable[subgps]) # 亚组前添加两空格
View(forest) # 预览数据看看有没有添加空格
attach(forest) # 绑定数据框
labeltext <- as.matrix(forest[,1:9],NA)

将forest数据框的前3列转换为矩阵

coef <- with(forest, cbind(coef1, coef2))
low <- with(forest, cbind(low1, low2))
high <- with(forest, cbind(high1, high2))
forestplot(labeltext,mean = coef, lower = low, upper = high) # 图形元素中置信区间上限
报错：Error in if (any(textHeight * (nr + 0.5) * 1.5 < info)) info <- textHeight * :
missing value where TRUE/FALSE needed
想知道怎么解决？