图中的R标记分位数
最大限度
我想在此图中指出此链接中的多个分位数。
x <- rnorm(1000,0,1)
me <- mean(x)
s <- sd(x)
y <- 1/sqrt(2*pi)/s*exp(-(x-me)^2/2/s/s)
sx <- sort(x)
n <- seq(1, length(sx),1)
Px <- (3*n-1)/(3*length(sx)+1)
plot(sx,Px)
lines(sx, pnorm(sx, mean=me, sd = s), lwd=3, col="red")
您会推荐哪个功能？到目前为止，我已经计算了这么多的分位数。
qq<-quantile(x,c(0.5,0.95))
罗曼
你可以试试：
# data
set.seed(1221)
x <- rnorm(1000,0,1)
# [your code to plot the graph]
# Quantiles
P <- c(0.05, .25, 0.5, 0.75, 0.95) # The quantiles you want to calculate
qq <- quantile(x, P)
df <- cbind(P, qq)
# the segments
apply(df, 1, function(x) segments(x0 = x[2], x1 = x[2], y0 = -10, y1 = x[1], lty = 2, col = 2))
apply(df, 1, function(x, y) segments(x0 = y-10, x1 = x[2], y0 = x[1], y1 = x[1], lty = 2, col = 2), min(x))
编辑
# add the text, not that elegant, but it works:
sapply(1:length(names(qq)), function(x) text(df[x,2], -0.08, bquote(Q[ ~ .(names(qq)[x])]), xpd = TRUE))
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
Pandas：如何在图中标记分组数据？
- 2
用do标记分配列表/对话
- 3
根据<img>标记分割HTML页面
- 4
在Altair中标记分层图表（Python）
- 5
根据<img>标记分割HTML页面
- 6
如何在Linux中标记分区？
- 7
如何删除传单中的标记分组？
- 8
R Plotly：气泡图中较小的标记
- 9
R Plotly：气泡图中较小的标记
- 10
如何在matplotlib箱图中标记四分位数？
- 11
在R中的分组箱图中显示中位数
- 12
如何防止HTML中的除法标记分散
- 13
如何使用plotly express标记分组的条形图？
- 14
匹配的事物组，由特定标记分隔
- 15
如何防止HTML中的除法标记分散
- 16
使用 Javascript 用 HTML 标记分隔字符串
- 17
在R的直方图中将x轴标记为正确
- 18
在R绘图气泡图中的标记内设置文本大小
- 19
在R中的地图中标记数据点
- 20
在 R plotly 散点图中发出更改标记颜色的问题
- 21
R 记分卡包 ID 列
- 22
组合图中的xlsxwriter标记
- 23
在两个标记内的任意位置匹配单词，由空格或标记分隔
- 24
R 多箱线图在一张图中带有值（分位数）
- 25
删除箱线图中的下四分位数和上四分位数，以及 R 中胡须之间的连接
- 26
删除箱线图中的下四分位数和上四分位数，以及 R 中胡须之间的连接
- 27
如何将HTML标记分解为Marionette视图？
- 28
使用下划线作为标记分割字符串
- 29
Excel：从单元格中提取由标记分隔的文本字符串的公式
我来说两句