带下标的轴标题但忽略第二个方括号 R

Question

我正在尝试向 ggpubr 图添加下标，我发现使用 parse 和一组方括号可以轻松完成。但是，问题是在轴标签内，我有第二组方括号，它们应该是常规类型。像这样：

library(ggpubr)
cars$speed <- log10(cars$speed)
ggscatter(cars, y = "speed", x = "dist", ylab = parse(text = "log[10](speed [μm])"))

我想要下标形式的对数 (10) 的底数，而不是距离度量 [μm]，它应该保留括号并保持正常字体大小。

我尝试过使用 paste(parse(text = "log[10]"), "(speed [μm])")、parse(text = "log[10](speed \[μm\]") 和 expression，但到目前为止这些都对我不起作用。

Answer 1

你可以这样做：

ggscatter(cars, y = "speed", x = "dist", ylab = 
            parse(text = "paste(log[10], \"(speed [μm])\")"))

Answer 2

或者使用 expression...


ggscatter(cars, y = "speed", x = "dist", ylab = expression(log[10]*"(speed [µm])"))

^{由 reprex package (v2.0.1)}

创建于 2022-03-03

Axis title with subscript but ignore second square bracket R