R forestplot不允许在带有is.summary的标签文本中使用表达式

Question

我使用forestplot，并希望在我的一个列名上标。我在下面复制了一个类似的例子(将列名从expression(beta)更改为我想要的expression(pseudo~R^2))。

data(HRQoL)
clrs <- fpColors(box="royalblue",line="darkblue", summary="royalblue")
tabletext <- 
  list(c(NA, rownames(HRQoL$Sweden)),
   append(list(expression(pseudo~R^2)), sprintf("%.2f", HRQoL$Sweden[,"coef"])))
forestplot(tabletext, 
       rbind(rep(NA, 3), 
             HRQoL$Sweden),
       col=clrs, 
       is.summary=c(TRUE,FALSE,FALSE,FALSE,FALSE),
       xlab="EQ-5D index")

点击这里查看图片

这工作得很好，虽然在我的情节我想指定is.summary。但是，执行do会打乱表达式的位置/对齐方式。

forestplot(tabletext, 
       rbind(rep(NA, 3), 
             HRQoL$Sweden),
       col=clrs, 
       is.summary=c(TRUE,FALSE,FALSE,FALSE,FALSE),
       xlab="EQ-5D index")

点击这里查看未对齐的图像

有办法解决这个问题吗?我可以要我的expression()和is.summary吗?

Answer 1

我以前有一个表达式定位的问题，因此所有这些都是居中的。我已经在dev-branch (v. 1.5.2)中修复了这个问题，使用devtools安装:

devtools::install_github("gforge/forestplot", ref="develop")