R语言ggplot给图形批量添加角度度数注释

大家好，我需要给ggplot2画出的图添加度数（°）注释(比如30.21°)。每个图度数不一样，如下图所示。怎么通过代码实现呢，谢谢大家。







基础添加文本或数字注释代码如下：

1. library(ggplot2)
   
2. p<-ggplot(mpg,aes(x=displ,y=hwy))+geom_point()+facet_wrap(~drv, nrow=2)#facet_grid表示以
   
3. f_labels<-data.frame(drv=c("4","f","r"),label=c("4wd","Front","Rear"))#创建标签数据框
   
4. p+geom_text(x=6,y=40,aes(label=label),data=f_labels) #给每个分面添加标签"4wd","Front","Rear"

复制代码

尝试了如下代码但是没有成功：

1. label<-c(expression(paste(44.97^o),expression(paste(44.84^o)),expression(paste(44.76^o)))

复制代码

使用Unicode字符可以解决

1. library(ggplot2)
   
2. 
   
3. f_labels<-data.frame(drv=c("4","f","r"),label=c("(slope= 44.93 \u00B0)","(slope=44.93)^o","(\u03bc)^o"))
   
4. p <- ggplot(mpg, aes(x = displ, y = hwy)) + geom_point() + facet_wrap (~ drv, nrow = 2)
   
5. 
   
6. p+geom_text(parse = F,x=6,y=40,aes(label=label),data=f_labels)

复制代码

wjjjyohhd 发表于 2021-10-19 09:40
使用Unicode字符可以解决

感谢回复，Unicode字符的确能解决许多数学符号画图问题