Metafor森林情节 - 改变颜色

Question

有没有办法根据文本更改森林图中完整行的颜色？

例如，在下图中，我希望能够有四种不同的行颜色，每种颜色对应一个DEF，RU，MID和EX。玩家专栏中的FWD。

Answer 1

col参数可以采用颜色矢量。所以，这样的事情应该有效：

library(metafor)

dat <- escalc(measure="RR", ai=tpos, bi=tneg, ci=cpos, di=cneg, data=dat.bcg)
cols <- c("red", "green", "blue")[match(dat$alloc, c("random", "alternate", "systematic"))]

forest(dat$yi, dat$vi, col=cols)