R 분산 분석(Anova)

첨부파일 three_sample.csv 파일 다운로드 #1단계:데이터 불러오기 data <- read.csv("Part3/three_sample.csv", header=T) head(data) data #2단계: 데이터 전처리 (NA, 이상치 제거) data <- subset(data, !is.na(score), c(method, score)) head(data) #3단계: 차트이용 outlier보기(데이터 분포 현황 분석) par(mfrow = c(1, 2)) plot(data$score) barplot(data$score) mean(data$score) #4단계: 데이터 정제(이상치 제거, 평균(14)이상 제거) length(data$score) data2 <- subset(data, score < 14) length(data2$score) #5단계: 정제된 데이터 확인 x <- data2$score par(mfrow = c(1, 1)) boxplot(x) #1단계: 세집단 su...