我使用r studio+r 2.15.3+win xp环境。多谢!
代码如下:
- # 生成x(从-3到3长度为2000的数列)和y(正态密度)
- x = seq(-3, 3, length = 2000)
- y = dnorm(x)
- # 建立图形框架
- plot(x, y, type = "l")
- # 设定5%和95%分位数之间的X点和相应密度值
- xx = seq(-1.65, 1.65, length = 100)
- yy = c(0, dnorm(xx), 0)
- xx = c(-1.65, xx, 1.65)
- # 灰色多边形
- polygon(xx, yy, col = "gray", border = NA)
- # 添加密度曲线
- lines(x, y)
- # 文本标注
- text(0, 0.05, "$P(-1.65 < X < 1.65) = 90\\%$")
- png("密度函数图形.png")
- pdf("密度函数图形.pdf")


雷达卡






京公网安备 11010802022788号







