с помощью функции addpoly в лесном участке - METAFOR пакет

Question

Я хотел бы добавить многоугольник к лесному массиву со следующей этикеткой:

«Я = 92,2%»

, в котором " 2 "является надстрочным и" 92,2% "вызывается из объекта rma (то есть res$I2).

Вот выдуманный пример:

library(metafor) 
data(dat.bcg) 
res <- rma(ai=tpos, bi=tneg, ci=cpos, di=cneg, data=dat.bcg, measure="RR", 
      method="REML") 
forest(res) 
addpoly(res,mlab=*) 

Что должно * быть?

Ниже не верхний индекс "2":

paste("I2 = ",round(res$I2,1),"%")) 

Ниже не работает.

bquote(I^2==.(round(res$I2,1))*"%") 

Answer 1

Вы должны повернуть результат от bquote() в выражение:

addpoly(res, mlab=as.expression(bquote(I^2==.(round(res$I2,1))*"%")))