摘要:
# test the skewness 以及峰度 library(moments) x <- rnorm(100,0,1) # 产生100均值为0, 标准差为1 的正太分布随机数 x <- rnorm(100,5,3) skewness(x) # 计算偏度 agostino.test(x) # 偏度
阅读全文
摘要:
p <- ggplot(mtcars, aes(mpg, wt, colour = cyl)) + geom_point() p + labs(colour = "Cylinders") p + labs(x = "New x label") # The plot title appears at
阅读全文