728x90
728x170
매출 = read.csv('data_win.csv')
library(dplyr)
library(ggplot2)
library(scales)
월점포비교 = 매출 %>%
filter(매출월 == 1) %>%
group_by(점포) %>%
summarise(합계 = sum(구매건수))
png('점포비교.png', 1000, 800)
qplot(점포, data = 월점포비교, geom = 'bar', fill = 점포) +
geom_bar(aes(weight = 합계)) +
scale_y_continuous(labels = comma)
dev.off()728x90
그리드형(광고전용)
'R > ggplot2' 카테고리의 다른 글
| [R/GGPLOT2] function 함수 : 그래프 저장하는 함수 만들기 (0) | 2016.03.16 |
|---|---|
| [R/GGPLOT2] jpeg 함수 : 그래프 저장하기 (0) | 2016.03.16 |
| [R/GGPLOT2] theme_set 함수 : 디폴트 테마 설정하기 (0) | 2016.03.16 |
| [R/GGPLOT2] theme_bw 함수 : base_size 인자 및 base_family 인자를 사용해 폰트 크기와 폰트 설정하기 (0) | 2016.03.16 |
| [R/GGPLOT2] theme_bw 함수 : Black & White 테마 사용하기 (0) | 2016.03.16 |
| [R/GGPLOT2] qplot 함수 : main 인자를 사용해 차트 제목 설정하기 (0) | 2016.03.16 |
| [R/GGPLOT2] expand_limits 함수 : y 인자를 사용해 Y축 최소값/최대값 설정하기 (0) | 2016.03.16 |
| [R/GGPLOT2] scale_y_continuous 함수 : labels 인자를 사용해 Y축 틱 레이블을 과학적 표기법으로 표시하지 않기 (0) | 2016.03.16 |
| [R/GGPLOT2] scale_y_continuous 함수 : labels 인자를 사용해 Y축 틱 레이블을 천 단위마다 콤마로 표시하기 (0) | 2016.03.16 |
| [R/GGPLOT2] scale_x_continuous 함수 : breaks 인자를 사용해 X축 틱 레이블 설정하기 (0) | 2016.03.16 |
