Я получаю эту ошибку при открытии файла "Forestplot.pdf". У меня есть print()
и я пытался запустить dev.off()
и graphics.error()
несколько раз. Я тоже пробовал ggsave()
.
Fplot <- forestplot(as.matrix(fpdata1[,1:3]), fpdata1$MEAN, fpdata1$LCL, fpdata1$UCL, graph.pos=3, graphwidth=unit(70,"mm"), boxsize=0.3, lwd.ci=1, ci.vertices=TRUE, ci.vertices.height=0.3,
lineheight="auto", colgap=unit(10,"mm"), zero=0, xticks=c(0.00, 0.25, 0.50, 0.75, 1.00),
hrzl_lines=list ("1" = gpar(lwd=1, col="black"), "4.0" = gpar(lwd=90, lineend="butt", columns=c(1:4), col="#99999922")),
title="Forest plot")
grid.text("xxxxx", unit(.18, 'npc'), unit(.88,'npc'), gp=gpar(fontsize=11, font=2))
grid.text("yyyyy", unit(.39, 'npc'), unit(.88,'npc'), gp=gpar(fontsize=11, font=2))
grid.text("zzzzz", unit(.75, 'npc'), unit(.88,'npc'), gp=gpar(fontsize=11, font=2))
print(Fplot)
pdf("Forestplot.pdf")
dev.off()