/*

 http://sosal.kr/
 * made by so_Sal
 */


> teaching_time

   ageGroup method days

1       <20      A    7

2       <20      B    9

3       <20      C   10

4     20-29      A    8

5     20-29      B    9

6     20-29      C   10

7     30-39      A    9

8     30-39      B    9

9     30-39      C   12

10    40-49      A   10

11    40-49      B    9

12    40-49      C   12

13      >50      A   11

14      >50      B   12

15      >50      C   14


two-way ANOVA


> aov.out <- aov( days~ ageGroup + method, data=teaching_time)

> summary(aov.out)
            Df Sum Sq Mean Sq F value   Pr(>F)    
ageGroup     4 24.933   6.233   14.38 0.001002 ** 
method       2 18.533   9.267   21.39 0.000617 ***
Residuals    8  3.467   0.433                     
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

연령대에 따라 학습능률에 차이가 있고,
가르치는 방법에 따라서도 학습능률에 차이가 있다.


'Programing > R- programming' 카테고리의 다른 글

R에서 사분위수와 box plot  (2) 2014.10.17
R graphics, plot 저장하기  (0) 2014.08.22
two-way ANOVA  (0) 2014.08.21
범주형 자료의 통계분석 R programming  (4) 2014.08.21
상관관계 분석 R programming  (0) 2014.08.21
데이터 검정 R programming  (2) 2014.08.21
Posted by sosal sosal

댓글을 달아 주세요