# NOT RUN {
# report_demo <- add_title(title = 'This is how a chronicle report looks', title_level = 1) %>%
# add_density(dt = iris, groups = 'Species', value = 'Sepal.Length', faceted = F) %>%
# add_boxplot(dt = iris, groups = 'Species', value = 'Sepal.Length') %>%
# add_barplot(dt = iris, bars = 'Species', value = 'Sepal.Length')
# add_table(table = iris,
# table_title = 'This is the iris dataset. Smells good!',
# html_table_type = 'kable') %>%
# add_table(table = mpg,
# table_title = 'And this is mpg',
# html_table_type = 'DT')
# render_report(report = report_demo,
# title = 'Demo Output',
# author = 'This is the author',
# filename = 'demo_output',
# output_format = 'prettydoc',
# keep_rmd = TRUE)
# }
Run the code above in your browser using DataLab