첨부 실행 코드는 나눔고딕코딩 폰트를 사용합니다.
본 블로그는 광고를 포함하고 있습니다.
광고 클릭에서 발생하는 수익금은 모두 블로그 콘텐츠 향상을 위해 쓰여집니다.

728x90
반응형
728x170
매출 = read.csv('data_win.csv')

library(dplyr)
library(ggplot2)
library(scales)

월점포비교 = 매출 %>%
    filter(매출월 == 1) %>%
    group_by(점포) %>%
    summarise(합계 = sum(구매건수))

jpeg('점포비교.jpg', 1000, 800)

qplot(점포, data = 월점포비교, geom = 'bar', fill = 점포) +
    geom_bar(aes(weight = 합계)) +
    scale_y_continuous(labels = comma)

dev.off()
728x90
반응형
그리드형
Posted by 사용자 icodebroker
TAG , , ,

댓글을 달아 주세요