library(rsunlight)
cw_timeseries(phrase='united states', start_date='2009-01-01', end_date='2009-04-30', granularity='month')
require(ggplot2)
dat = cw_timeseries(phrase='climate change')
ggplot(dat, aes(day, count)) +
geom_line() +
theme_grey(base_size=20)