ggplot2 中的下标

Question

我正在尝试使用 ggplot2 图表获得我想要的颜色和图例标签的组合。

基本上下面的代码实现了大多数事情，除了我无法让图例标签显示我想要的东西，理想情况下我希望它是 'treatment 1' 以'1'作为下标但我可以'不要放像这样的表达式 expression('treatment'[+1]) 因为它似乎不接受它在 labels 参数中。有人可以帮忙吗，这让我发疯了！

我认为应该可以将它插入语法中的其他地方，但我不确定在哪里。

graph1<-ggplot(data2, aes(SMR_residuals,y=log(Time), color = factor(Treatment, labels = c("1", "2", "3","4")))) + geom_point() + labs(color = "Treatment") + geom_smooth(method="lm", se=F) + scale_colour_brewer(palette = "Set1")

Answer 1

所以我想在一些帮助下我设法解决了这个问题，我最终使用了 scale_colour_brewer 并在其中编写了标签的表达式，这似乎已经成功了：

graph1<- ggplot(data2,aes(SMR_residuals,y=log(Time),color=Treatment)) +
geom_point()+ labs(color="Treatment") + geom_smooth(method="lm", se=F) +
theme(legend.text.align = 0) + scale_colour_brewer(palette="Set1", breaks =
c("IND","IND2","IND4","IND6"),
labels=c("Treatment",expression("Treatment"[+2]),expression("Treatment"[+4]),
expression("Treatment"[+6])))

ggplot2 中的下标

Subscript in ggplot2

r

subscript

ggplot2