Code
a_plot <- RplotterPkg::create_stick_plot(df = RplotterPkg::air_passengers,
aes_x = "time", aes_y = "value", title = "Monthly Totals of International Airline Passengers",
subtitle = "1949 - 1960 (classic Box & Jenkins)", x_title = "Time", y_title = "Totals",
x_major_date_breaks = "1 year", x_date_labels = "%Y", rot_y_tic_label = TRUE,
show_minor_grids = FALSE, bold_y = 0)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.