如何解决在ggplot2中合并图例的标题中使用上标
我正在用ggplot绘制散点图,并根据变量更改颜色和形状,如下面的代码所生成的图像。
a<-c(2,5,2,6,1,3,6)
b<-c(5,7,8,9)
c<-c(rep("n",4),rep("m",4))
data<-data.frame(a,b,c)
ggplot(data,aes(a,shape=c,color=c))+
geom_point()
在相同的图例中,可以按预期看到颜色和形状。如果只需简单更改标题,就必须同时更改形状颜色和形状,并且效果很好。
ggplot(data,color=c))+
geom_point()+
labs(color="dif",shape="dif")
当我使用expression()
编写上标时出现问题。如果我使用带有简单单词的表达式也可以很好地工作,但是添加上标后,形状和颜色的图例不会再次合并。
ggplot(data,color=c))+
geom_point()+
labs(color=expression((ng~g^{-1})),shape=expression((ng~g^{-1})))
对这个问题有什么解决办法吗?
解决方法
如果将表达式存储在对象中,则可以避免这种固定行为:
title_exp <- expression((ng~g^{-1}))
ggplot(df,aes(a,b,shape = c,color = c)) +
geom_point() +
labs(color = title_exp,shape = title_exp)
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。