省事一点的话就
ks.test(x,pnorm)
虽然可能没有shapiro.test那么powerful，不过这么大的数据应该差不多。
或者
qqnorm(x);qqline(x)
不过不是正式的检验。
要不就看看nortest包或者其他包里的函数。
