是否可以在geom_text中以希腊字母添加索引?

时间:2019-09-05 13:57:52

标签: r ggplot2 geom-text

我正在绘制图形,并且需要在希腊字母上加上一个索引,例如$ \ lambda_1 $和$ \ lambda_2 $。但是我只是不知道将这些索引$ 1 $和$ 2 $放入$ \ lambda $的热度。

这是我尝试过的:

 gridd1 = c(0.10, 1.08, 8.92, 9.90) 
 gridd2 = c(0.10, 1.08, 8.92, 9.90) 
 gridd = expand.grid(gridd1,gridd2)
 grid1 = gridd$Var1
 grid2 = gridd$Var2
 gridd<-    
  data.frame(x=gridd$Var1,y=gridd$Var2,col=as.character("Other Points"),stringsAsFactors=FALSE)
 gridd[c(1,2,5,6),"col"]<-"A"
 gridd[c(3,4,7,8),"col"]<-"B"
 gridd[c(9,10,13,14),"col"]<-"c"
 gridd[c(11,12,15,16),"col"]<-"D"

bellow是图形的代码

ggplot(gridd, aes(x=grid1, y=grid2, group=col)) +
  geom_point(aes(shape=col, color=col, size = col),show.legend = FALSE)+
  scale_shape_manual(values=c(19,19,19,19))+
  coord_cartesian(xlim = c(.42, 9.57), ylim = c(.43,9.6))+
  scale_size_manual(values=c(4,4,4,4)) +
  scale_color_manual(values=c('green','blue','yellow','black'))+
  #geom_abline(slope=1, intercept=0)+
  geom_hline(yintercept=4.8)+
  geom_text(label ="lambda",
            parse = TRUE, x = 5, y = 7.5,cex=10)+
  geom_text(label ="lambda",
            parse = TRUE, x = 5, y = 2.5,cex=10)

enter image description here

我希望在图形上放置$ \ lambda $的索引1和2。我尝试使用lambda_1,但没有成功。

0 个答案:

没有答案