[ 이토록 쉬운 통계&R 100일 프로젝트 ] 61일차

공부 페이지

308 페이지

배운 개념

prop.table() 사용하기

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

> t_AGE_SEX = table(treat$AGE, treat$SEX)   > round(prop.table(t_AGE_SEX, 1), 2)                             1_남 2_여   01_0-4세    0.52 0.48   02_5-9세    0.53 0.47   03_10-14세  0.52 0.48   04_15-19세  0.52 0.48   05_20-24세  0.40 0.60   06_25-29세  0.36 0.64   07_30-34세  0.34 0.66   08_35-39세  0.38 0.62   09_40-44세  0.42 0.58   10_45-49세  0.41 0.59   11_50-54세  0.39 0.61   12_55-59세  0.38 0.62   13_60-64세  0.41 0.59   14_65-69세  0.41 0.59   15_70-74세  0.45 0.55   16_75-79세  0.42 0.58   17_80-84세  0.39 0.61   18_85세이상 0.35 0.65

cs

20세 이전까지 남자의 비중이 높다. 부모의 품을 더난 20세 이후부터는 남자의 비중이 40% 수준으로 떨어진다. 즉, 아파도 병원을 자주 찾지 않는 것으로 추측할 수 있다.

다음 시간에 배울 것

열 백분율로 성별 연령대 분포 살펴보기