### Moments of the normal distribution, mean 1, variance 4mu <-1sigma <-2mom <- c(0,sigma^2,0,3*sigma^4,0,15*sigma^6,0,105*sigma^8)### standard error of sample variancemomSE(2,100, mom[1:4])### should besqrt(2*sigma^4)/10### standard error of sample central third momentmomSE(3,100, mom[1:6])### should besqrt(6*sigma^6)/10### standard error of sample central fourth momentmomSE(4,100, mom)### should besqrt(96*sigma^8)/10