现代统计图形 - 科学网—博客
现代统计图形 - 科学网—博客
现代统计图形 - 科学网—博客
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
2.3 安装R语言 19<br />
1 > # 生成x(从-3到3长度为200的数列)和y(正态密度)<br />
2 > x = seq(-3, 3, length = 200)<br />
3 > y = dnorm(x)<br />
4 > # 建立图形框架<br />
5 > plot(x, y, type = "n")<br />
6 > # 设定5%和95%分位数之间的X点和相应密度值<br />
7 > xx = seq(-1.65, 1.65, length = 100)<br />
8 > yy = c(0, dnorm(xx), 0)<br />
9 > xx = c(-1.65, xx, 1.65)<br />
10 > # 灰色多边形<br />
11 > polygon(xx, yy, col = "gray", border = NA)<br />
12 > # 添加密度曲线<br />
13 > lines(x, y)<br />
14 > # 文本标注<br />
15 > text(0, 0.05, "$P(-1.65 < X < 1.65) = 90\\%$")<br />
y<br />
0.0 0.1 0.2 0.3 0.4<br />
P (−1.65 < X < 1.65) = 90%<br />
-3 -2 -1 0 1 2 3<br />
图 2.1: 正态分布密度曲线及其5%到95%分位数区间表示<br />
x