r语言 - 在 PCA 双标标签中添加下标

Question

我正在尝试创建一个双标，但我的标签是需要下标的化学式，例如：NO3 应该是 NO 下标 3 上标 -。如何在双标图上的列名标签中获取下标？

library("FactoMineR")
library("ggplot2")
Site <- c("site1", "site2", "site3")
NO3 <- c(100, 300, 200)
NH4 <- c(210, 400, 800)
DON <- c(300, 350, 200)
dat <- cbind(NO3, NH4, DON)
data.frame(dat)
rownames(dat)<- Site

res.pca <- PCA(dat, scale.unit = TRUE, ncp = 4, graph = TRUE)
print(res.pca)

Answer 1

您可以使用 R 函数表达式，例如

plot(x, y, main=expression('NO'[3]))