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

728x90
반응형
728x170

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

매출 = read.csv("data_win.csv")

점포월매출 = 매출 %>% group_by(매출월, 점포) %>% summarise(합계 = sum(구매건수))

a점포매출 = 점포월매출 %>% filter(점포 == "a")

qplot(매출월, 합계, data = a점포매출, geom = "line", main = "a 점포 매출") +
    scale_x_continuous(breaks = 1:12) +
    scale_y_continuous(labels = comma) +
    expand_limits(y = c(190000, 550000))
728x90
반응형
그리드형
Posted by 사용자 icodebroker
TAG , , ,

댓글을 달아 주세요