RD = ptt RD$artDate = format(RD$artDate,"%Y/%m") RD = RD %>% group_by(artDate) %>% count() ggplot(data=RD) + # 先畫bar plot geom_bar(aes(x=factor(1), y=n, ...
確定！ 回上一頁
