内容简介：翻译自：https://stackoverflow.com/questions/4542438/adding-summary-information-to-a-density-plot-created-with-ggplot
我有一个密度图,我想添加一些摘要信息,例如在中位数放置一条线并遮蔽90％可信区间(第5和第95分位数).有没有办法在ggplot中这样做？
这是我想总结的情节类型：
我可以弄清楚如何从y = 0到y =密度(中位数(x))绘制一条线,但是我不清楚我是否可以使用90％CI对阴影进行着色.或者,我可以在密度图上方添加一个水平箱图,但不清楚如何在不旋转密度图的情况下自动旋转箱图.
x <- as.vector(rnorm(10000)) d <- as.data.frame(x=x) library(ggplot2) ggplot(data = d) + theme_bw() + geom_density(aes(x=x, y = ..density..), color = 'black')
x <- as.vector(rnorm(10000))
d <- as.data.frame(x=x)
library(ggplot2)
p <- ggplot(data = d) + theme_bw() +
geom_density(aes(x=x, y = ..density..), color = 'black')
# new code is below
q5 <- quantile(x,.05)
q95 <- quantile(x,.95)
medx <- median(x)
x.dens <- density(x)
df.dens <- data.frame(x = x.dens$x, y = x.dens$y)
p + geom_area(data = subset(df.dens, x >= q5 & x <= q95),
aes(x=x,y=y), fill = 'blue') +
geom_vline(xintercept = medx)
翻译自：https://stackoverflow.com/questions/4542438/adding-summary-information-to-a-density-plot-created-with-ggplot
以上所述就是小编给大家介绍的《将摘要信息添加到使用ggplot创建的密度图中》，希望对大家有所帮助，如果大家有任何疑问请给我留言，小编会及时回复大家的。在此也非常感谢大家对 码农网 的支持！
猜你喜欢:
- 无监督学习概述之密度估计
- 密度聚类算法之OPTICS
- 机器学习：基于密度的异常值检测算法
- 用R语言实现密度聚类dbscan
- 用R语言实现密度聚类dbscan
- 算法工程师的数学基础：如何理解概率分布函数和概率密度函数
本站部分资源来源于网络，本站转载出于传递更多信息之目的，版权归原作者或者来源机构所有，如转载稿涉及版权问题，请联系我们。
The Black Box Society
Frank Pasquale / Harvard University Press / 2015-1-5 / USD 35.00
Every day, corporations are connecting the dots about our personal behavior—silently scrutinizing clues left behind by our work habits and Internet use. The data compiled and portraits created are inc......一起来看看 《The Black Box Society》 这本书的介绍吧!
