R tableGrob在plotmath中以科学计数法绘制数字

Question

我想使用包含数字的tableGrob在R中绘制一个表，这些数字应该在数学模式下以科学计数法显示，例如2.45x10⁵。

我尝试使用format(x,scientific=TRUE)但它只显示为2.45e + 5。如果我通过theme=ttheme_default(core=list(fg_params=list(parse=TRUE)))，它会丢弃某些数字的格式，只显示纯十进制数字。

library(gridExtra)
x<-matrix(c(4.5*10^-5,2.33*10^5))
tt<-ttheme_default(core=list(fg_params=list(parse=TRUE)))
plot(tableGrob(format(x,scientific=TRUE),theme=tt))

输出显示：

4.5e-05
233000

我宁愿：

4.50×10⁻⁵
2.33×10⁵