t vs. z

Comparación de t_(n-2) versus N_(0,1)

# Distribución normal N(0,1)
x <- seq(-5,5,length=100)
plot(x,dnorm(x),type="l",lwd=3)

#t (3 grados de libertad)
lines(x,dt(x,df=3),lwd=3,col="red")

# t (10 grados de libertad)
lines(x,dt(x,df=10),lwd=3,col="blue")