在X轴刻度上添加乳胶表达式@ ggplot2 [英] add latex expression on x-axis ticks @ggplot2
问题描述
我有这个数据框:
库(ggplot2)库('latex2exp')dfvi< -structure(list(rel.imp = c(7.97309042736285,3.68859054679465,-0.672404901177933,-0.56914400358685、0.461768686793877,-0.393707520847751,0.331273538653149、0.257999910761084,-0.226891321033094、0.179124365066449),x.names = c("a","x","d","ft","ew","qw","ccc","sas","imb","msf")),row.names = c(NA,-10L),.Names = c("rel.imp","x.names"),类="data.frame")
我使用 ggplot2
进行如下绘制:
ggplot(dfvi,aes(x = x.names,y = rel.imp))+geom_segment(aes(x = x.names,xend = x.names,y = 0,yend = rel.imp),color ="grey")+geom_point(color ="orange",size = 4)+scale_y_continuous(breaks = c(-1,seq(0,8,2)))+scale_x_discrete(labels = c('a'='a','x'='x','d'= TeX('$ mode(L_ {ij})$'),'ft'= expression('$ R_{ij} $'),'ew'= TeX('$ Q_ {ij} $'),'qw'='qw','ccc'='ccc','sas'='sas','imb'='imb','msf'='msfff'))+theme_light()+主题(axis.text.x = element_text(angle = 90,just = 1),panel.grid.major.x = element_blank(),panel.border = element_blank(),axis.ticks.x = element_blank())+ xlab("X标签")+ ylab("Y标签")
这给了我们
我想在x轴刻度上使用一些数学符号(例如$ R_ {ij} $).我遵循了
I have this data frame :
library(ggplot2)
library('latex2exp')
dfvi<-structure(list(rel.imp = c(7.97309042736285, 3.68859054679465,
-0.672404901177933, -0.56914400358685, 0.461768686793877,-0.393707520847751,
0.331273538653149, 0.257999910761084, -0.226891321033094, 0.179124365066449
), x.names = c("a", "x", "d", "ft", "ew", "qw", "ccc", "sas",
"imb", "msf")), row.names = c(NA, -10L), .Names = c("rel.imp",
"x.names"), class = "data.frame")
I do a plot as follows using ggplot2
:
ggplot(dfvi, aes(x=x.names, y=rel.imp)) +
geom_segment( aes(x=x.names, xend=x.names, y=0, yend=rel.imp),color="grey") +
geom_point( color="orange", size=4) +
scale_y_continuous(breaks=c(-1,seq(0,8,2)))+
scale_x_discrete(labels=c('a'='a','x'='x','d'=TeX('$mode(L_{ij})$'),'ft'=expression('$R_{ij}$'),'ew'=TeX('$Q_{ij}$'),'qw'='qw','ccc'='ccc','sas'='sas','imb'='imb','msf'='msfff'))+
theme_light() +
theme(
axis.text.x = element_text(angle=90,hjust=1),
panel.grid.major.x = element_blank(),
panel.border = element_blank(),
axis.ticks.x = element_blank())
+ xlab("X label") + ylab("Y label")
which gives us:
I'd like to use some math symbols on the x-axis ticks (for instance, $R_{ij}$). I followed this solution but it is not working for me. Note that I tried expression('$R_{ij}$')
and TeX('$Q_{ij}$')
inside scale_x_discrete
thru labels
. How can I print as in LaTeX
for the x ticks? I have used TeX
in the past within xlab
in ggplot
, but apparently something is going on with scale_x_discrete
.
All you have to do is to parse(text = ...)
the TeX-expressions:
ggplot(dfvi, aes(x=x.names, y=rel.imp)) +
geom_segment( aes(x=x.names, xend=x.names, y=0, yend=rel.imp),color="grey") +
geom_point( color="orange", size=4) +
scale_y_continuous(breaks=c(-1,seq(0,8,2)))+
scale_x_discrete(labels=c('a'='a','x'='x',
'd'=TeX('$mode(L_{ij})$'),
'ft'=parse(text = TeX('$R_{ij}$')),
'ew'=parse(text = TeX('$Q_{ij}$')),
'qw'='qw','ccc'='ccc','sas'='sas','imb'='imb','msf'='msfff'))
....
Note: You might change the font size. I used axis.text.x = element_text(angle=90,hjust=1, size = 12)
.
这篇关于在X轴刻度上添加乳胶表达式@ ggplot2的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!