r month.name[params$i]
flightsSummary statistics for r month.name[params$i]
with(head(get_month_data(params$i), 100), plot(dep_time, sched_dep_time))
summary(get_month_data(month = params$i))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.