[Adp 실기 기출 풀이] 25회 5번 공장 순위 문제
문제는 멋쟁이천재사자님의 내용을 참고하였습니다.
https://it-freelancer.tistory.com/65
[Adp 실기 기출 풀이] 25회 5번 공장 순위 문제
웹에 공유된 정보를 활용하여 문제를 만들어 풀어 보았습니다. 올바른 답인지도 불확실하며, 문제가 올바른지도 불확실합니다. 참고한 자료 link https://lovelydiary.tistory.com/381 https://blog.naver.com/sbp36
it-freelancer.tistory.com
문제
aa 에 x y z 3개의 공장(group칼럼)에서 생산된 총 32개 제품 무게의 순위정보(rank 칼럼)가 있다.
공장별로 생산되는 제품 무게에 차이가 있는지 검증하라.
5-1. 연구가설과 귀무가설을 설정하시오
- 귀무가설 : 공장별로 생산되는 제품 무게에 차이가 없다.
- 연구가설 : 공장별로 생산되는 제품 무게에 차이가 있다.
5-2. 검정통계량을 구하고 가설을 채택하시오
문제 특징 : 순위 정보만 있음.
kruskal .test 로 풀이
sample data로는 다음과 같이 되어있었음..
x <- c(2.9, 3.0, 2.5, 2.6, 3.2) # normal subjects
y <- c(3.8, 2.7, 4.0, 2.4) # with obstructive airway disease
z <- c(2.8, 3.4, 3.7, 2.2, 2.0) # with asbestosis
kruskal.test(list(x, y, z))
wilcox test도 연관이 있는거 같은데 아래 고수께서 친절하게 작성을 해주셨는데
kruscal은 모든 관측치가 독립, 반복되는 관측치는 관련이 있음
wilcox는 관측치가 pair 되었을때 유효하다라고 이해했다.
https://stats.stackexchange.com/questions/302464/wilcoxon-signed-rank-vs-kruskal-wallis
Wilcoxon-signed rank vs Kruskal-Wallis?
I am rather stressed out about my methodology. For my PhD I ran a year long literacy intervention (small scale longitudinal study) that was supposed to test the rate of change in individual students'
stats.stackexchange.com
아무튼 wilcox.test 코드도 한번 봐두자(sample)
ranks <- c(1:20)
groupA <- factor(rep("A", 10))
groupB <- factor(rep("B", 10))
data <- data.frame(ranks, group = c(groupA, groupB))
wilcox.test(ranks ~ group, data = data)