[R코딩] 서브그룹 평균을 각 원소 값으로 반환 (ave)

사용 형식 : ave(종속변수, 독립변수(범주형))

 

반환 결과 : 벡터

 

아래와 같은 데이터프레임이 있다고 합시다. A,B,C 반 학생의 수학점수입니다.

 

> dt=data.frame(score=c(75,73,79,83,85,92,99,100,72,83),class=c('A','A','A','B','B','B','C','C','C','C'))
> dt
   score class
1     75     A
2     73     A
3     79     A
4     83     B
5     85     B
6     92     B
7     99     C
8    100     C
9     72     C
10    83     C

 

각 반별로 따로 평균을 구하고, 각 값을 해당 평균값으로 바꾸고 싶습니다. 이럴 경우 사용하는 함수가 ave 함수입니다. 

 

> ave(dt$score,dt$class)
 [1] 75.66667 75.66667 75.66667 86.66667 86.66667 86.66667 88.50000 88.50000
 [9] 88.50000 88.50000