Сохранить лесной участок, созданный с помощью rmeta

Question

Я делаю лесной участок с пакетом rmeta. Моя проблема заключается в сохранении произведенного участка, поскольку он не показывает всю фигуру.

Моя выборка данных:

Results 
metabolite expb lower95 upper95 pvalue se 
a   1,02 0,98 1,04  0,05 0.01 
b   1,03 0,99 1,05  0,06 0.02 
c   1,05 1,02 1,10  0,08 0.03 
... 
number of metabolites is 70 

Я делаю участок леса следующим

library(rmeta) 
d <- meta.summaries(results$expb, results$se, names = results$metabolite, method = c("fixed"), data = results) 

tabletext <- cbind(c("95%", "Lower", results$lower95, NA, NA), c("C.I.", "Upper", results$upper95, NA, NA), c("", "P-value", results$pvalue, NA, round(d$summary, 2))) 

m <- c(NA, NA, results$expb, NA, d$summary) 
m <- round(m, digits = 2) 
l <- c(NA, NA, results$lower95, NA, d$summary - d$se.summary * 1.96) 
l <- round(l, digits = 2) 
u <- c(NA, NA, results$upper95, NA, d$summary + d$se.summary * 1.96) 
u <- round(u, digits = 2) 

forestplot(tabletext, m, l, u, zero = 1, summary = c(TRUE, TRUE, rep(FALSE, 
8), TRUE), boxsize = 0.2,cex.axis=0.2) 

Однако это сокращение производства участок, когда я сохранить его. Не могли бы вы помочь мне решить проблему. Спасибо за любые советы. PS. вы можете найти пример в следующей ссылке. Example figure

Answer 1

Отчасти поэтому я создал пакет forestplot. Он основан на rmeta :: foresplot, поэтому вам не нужно ничего менять в вызове функции.