image.png
今天用ggplot2作图y轴的标题想实现上图红框里的形式，查了一下如何实现 记录一下代码
首先是构造一份数据集
df<-data.frame(x=1,y=1)
R语言ggplot2散点图并添加文本
library(extrafont)
fonts()
library(ggplot2)
ggplot(data=df,aes(x=x,y=y))+
geom_text(label="\u03c0",size=30,
family="Times New Roman",
fontface="italic")
family参数设置具体使用哪种字体
fontface参数设置斜体
这里\u03c0 是Unicode字符，对应关系可以在链接
https://www.rapidtables.com/code/text/unicode-characters.html
查看
设置横坐标的标题
library(ggstar)
ggplot(data=df,aes(x=x,y=y))+
geom_text(label="\u03c0",size=30,
family="Times New Roman",
fontface="italic",
hjust=4)+
geom_star(starshape=16,size=40,fill="red")+
theme_bw()+
labs(x=expression(Nucleotide~diversity~'('~italic('\u03c0')~'\u00d7'~10^{-3}~")"))+
theme(axis.title.x = element_text(family="Times New Roman"))
结果如下
image.png
欢迎大家关注我的公众号
小明的数据分析笔记本
小明的数据分析笔记本 公众号 主要分享：1、R语言和python做数据分析和数据可视化的简单小例子；2、园艺植物相关转录组学、基因组学、群体遗传学文献阅读笔记；3、生物信息学入门学习资料及自己的学习笔记！
