[R] 테이블을 비율로 변환

먼저 테이블을 하나 정의합시다. 다섯 사람의 성별과 혈액형 데이터입니다. 

 

> gender=c("M","M","F","F","M")
> btype=c("A","B","B","A","B")
> mt=table(gender,btype)
> mt
      btype
gender A B
     F 1 1
     M 1 2

 

비율로 바꿔봅시다. 함수는 prob.table() 입니다. 전체 합이 1이 되도록 비율로 바꾼 것입니다. 

 

> prop.table(mt)
      btype
gender   A   B
     F 0.2 0.2
     M 0.2 0.4

 

이번에는 옵션을 추가해봅시다. margin 옵션입니다. margin=1 로 설정할 경우 각 행의 합이 1이 되도록 비율로 바꾸는 것입니다. 

 

> prop.table(mt,margin=1)
      btype
gender         A         B
     F 0.5000000 0.5000000
     M 0.3333333 0.6666667

 

margin=2 로 할 경우 각 열의 합이 1이 되도록 비율로 바꿔줍니다. 

 

> prop.table(mt,margin=2)
      btype
gender         A         B
     F 0.5000000 0.3333333
     M 0.5000000 0.6666667