写在前面。
进行可视化时,仅仅展示数据是不够的,还有各种各样的其他信息
可以呈现出来帮助解读数据
。
这篇文章说明一些可以向主题图形添加的独立的图形元素
或者文本元素
,以帮助更好地呈现信息。
注释中的数学表达式
如何添加一条含数学表达式的文本注解?
使用annotate
并设置parse=TRUE
选项。
ggplot(data.frame(x = c(-3,3)), aes(x = x)) + stat_function(fun = dnorm)+
annotate("text", x =2, y = 0.3, parse = TRUE,
label = "frac(1,sqrt(2*pi))*e^{-x^2/2}")
和那些利用plotmath
和expression
创建的数学表达式有着类似的格式。
[图片上传失败...(image-dd2c92-1697158438994)]
独立分面注释
如何向图形的各个分面添加注释
?
使用分面变量
创建一个新的数据框,设定每个分面要绘制的值。
f_labels <- data.frame(drv = c("4","f","r"),label = c("4wd", "Front","Rear"))
然后使用geom_text
语句:
p <- ggplot(data = mpg, aes(x = displ , y = hwy)) +
geom_point() + facet_grid(.~drv) +
geom_text(data = f_labels, x = 6, y = 40, aes(label = label))
p
[图片上传失败...(image-2f946c-1697158438994)]
以上。
网友评论