现代统计图形 - 科学网—博客

164 附录 B 作图技巧
1 > # 本代码为“伪代码”,下图由pgfSweave生成
2 > plot(seq(-3, 3, 0.1), dnorm(seq(-3, 3, 0.1)), type = "l",
3 + xlab = "x", ylab = expression(phi(x)))
4 > text(-3, 0.37, adj = c(0, 1), expression(phi(x) ==
5 + frac(1, sqrt(2 * pi)) ~ e^-frac(x^2, 2)), cex = 1.2)
6 > arrows(-2, 0.27, -1.3, dnorm(-1.3) + 0.02)
7 > abline(v = qnorm(0.95), lty = 2)
8 > text(0, dnorm(qnorm(0.95)), expression(integral(phi(x) *
9 + dx, -infinity, 1.65) %~~% 0.95))
φ(x)
0.0 0.1 0.2 0.3 0.4
φ(x) = 1
√ 2π exp(− x2
2 )
1.65
φ(x)dx ≈ 0.95
−∞
-3 -2 -1 0 1 2 3
图 B.1: 正态分布密度函数公式的表示
x