Database for Everything

Age(나이) 변수 #Age변수 확인 class(data$Age) [1] "numeric" library(gridExtra) bin_10_age% #Age변수를 분할한 Age_group 변수 생성 group_by(Age_group) %>% summarise(Survive=sum(as.numeric(Survived)-1, na.rm=T),#각 Age_group별 생존자의 합 count=n()) %>% mutate(Survive_rat=Survive/count) %>% #계산한 Survive와 count로 생존자 비율 구하기 ggplot()+ geom_col(aes(x=Age_group, y=Survive_rat, fill=Age_group))+ theme(axis.text.x=element_text(ang..