【R语言系列02】plot ggplot作图，标注虚线，标注文本，添加阴影误差带

最新推荐文章于 2023-08-26 00:17:07 发布

Brandon Bryant

最新推荐文章于 2023-08-26 00:17:07 发布

阅读量1.1w

点赞数 3

分类专栏： R 文章标签： ggplot2 可视化 r语言

本文链接：https://blog.youkuaiyun.com/weixin_45632492/article/details/109002044

版权

本文是R语言系列的第二篇，重点介绍了如何使用ggplot2进行图形标注、添加虚线以及绘制阴影误差带。通过三个示例，包括标准差直方图的标注、二维直方图与损失的展示，以及第三个未详述的示例，展示了ggplot2在数据可视化中的高级用法。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

【R语言系列02】R作图中的标注虚线，文本，阴影误差带

【以往专题】
【R语言系列01】拼贴操作 paste 与 paste0

本期将从几个模拟实例当中提供一些常用作图技巧的分享。

需要的包：

reshape2进行长宽表转换
ggplot2 ggplot作图
ggthemes 设置主题

Example 1 The histogram of normalized std

效果

实例1

代码

set.seed(824)
std_list = seq(-0.75, 1.00, 0.025)
number_list = sort(rnorm(71, 5, 2))
adjust_list = 10^number_list + rexp(71, 0.001


ShowPoint = function(x, col_, labels_, lx, ly){
   
  index = (x + 0.75) / 0.025 + 1
  segments(x, 10, x, adjust_list[index], col = col_, lty = 4, lwd = 2)
  segments(-1.25, adjust_list[index], x, adjust_list[index], col = col_, lty = 4, lwd = 2)
  text(x, adjust_list[index]*2, labels = labels_)
  text(lx, ly, paste0(labels_,"(norm_std=",as.character(x)," num=",as.character(as.integer(adjust_list[index])),")"))
}

plot(std_list, adjust_list, col = 'blue', type = 'l', xlim = c(-1,1), ylim = c(100, max(adjust_list)), log='y', xlab = 'normalized std', ylab = 'the number of samples', main = 'The histogram of normalized std')

ShowPoint(-0.55, "green", "A", 0.6, 6400)
ShowPoint(-0.25, "orange", "B", 0.6,

最低0.47元/天解锁文章