어리둥절 분석가 그리고 개발자

✔️ 필요성 ggplot을 그렸을 때 뒷배경이 어떤 라인도 없이 흰색이었으면 할 때가 있다 ✔️ 활용 예제 data %>% ggplot() + geom_bar(aes(x=type, y=value, stat="identity")) + theme( panel.background = element_rect(fill="white", colour="black"), strip.background = element_rect(fill="white", colour="black"), legend.position = "none" #legend 없애기 )

✔️ 필요성 이런식으로 츄파츕스 같이 생긴 차트를 만들고 싶을 때가 있습니다ㅋㅋㅋㅋ 있었어요 저는... ✔️ 활용 예제 tmp %>% dplyr::select(type, value) %>% ggplot() + geom_point(aes(x=type, y=value)) + geom_segment(aes(x=type, xend=type, y=0.75, yend=value)) + ylim(0.75, 1)

✔️ 필요성 ggplot으로 x축이 날짜인 그래프를 그렸다. 그리고 내가 원하는 특정 날짜마다 포인트를 주기 위해서 세로선을 그리고 싶다. 그런데 일일이 날짜를 계산해서 geom_vline을 추가하려니 힘들다. for loop을 활용해보자. ✔️ 활용 예제 # 그림 그리기 p = data %>% mutate(time = ymd(dt)) %>% ggplot() + geom_line(aes(x=time, y=cnt, group=region)) + facet_wrap(~region, scales='free_x') + theme_bw() + theme(legend.position = 'top') + xlab('') + ylab('') + scale_y_continuous(labels = scales::comma..