#分位数图,画t分布密度带p值 x=seq(-6,6,length=1000); y=dt(x,19) r1=-6; r2=-2.89; x2=c(r1,r1,x[x<r2&x>r1],r2,r2) y2=c(0,dt(c(r1,x[x<r2&x>r1],r2),19),0) plot(x,y,type="l",ylab="Density oft(19)",xlim=c(-5,5)) abline(h=0);polygon(x2,y2,col=...
www.jb51.net/article/2099...htm 2024-5-22