摘要: #读剪贴板数据 data <- read.table('clipboard',header = F,sep = ',') basicStats(data) 阅读全文
posted @ 2020-04-19 20:38 be·freedom 阅读(262) 评论(0) 推荐(0)
摘要: 结论:无关 rm(list=ls())#样本sd与峰度无关 i=1 p <- seq(1,100,1) b <- seq(1,100,1) while (i<100) { a <- rnorm(100,10,i) out1<-basicStats(a) b[i] <- out1[15,] i=i+1 阅读全文
posted @ 2020-04-19 20:37 be·freedom 阅读(368) 评论(0) 推荐(0)
摘要: 单因素 rm(list = ls()) install.packages('multcomp') library(multcomp) data('cholesterol') head(cholesterol) data <- cholesterol #正态性分析#### shapiro.test(c 阅读全文
posted @ 2020-04-19 20:30 be·freedom 阅读(10250) 评论(0) 推荐(1)