[ R ] ggplot2 — multi-line graph example code

peter_yun
1 min readJul 6, 2017

--

2017 summer USC

#x-day, gropby-month
md_data = data %>%
group_by(month,day) %>%
summarize(count = sum(count),
duration = sum(duration),
total = sum(total) )
head(md_data)ggplot(md_data, aes(x=day,y=count,group=month))+
geom_line(aes(color=month))
#x-wday, groupby-month
mw_data = data %>%
group_by(month,wday) %>%
summarize(count=mean(count),
duration=mean(duration),
total=mean(total))
head(mw_data)
ggplot(mw_data,aes(x=wday,y=total,group=month))+
geom_line(aes(color=month))
#x-time, groupby-wday
tw_data = data %>%
group_by(time,wday) %>%
summarize(count=mean(count),
duration=mean(duration),
total=mean(total))
head(tw_data)
ggplot(tw_data,aes(x=time,y=total,group=wday))+
geom_line(aes(color=wday)) +
geom_point(aes(color=wday))

--

--