library(tidyverse) library(lubridate) library(DERTtools) knitr::opts_chunk$set(echo = FALSE)
# db <- read_npds_notification_db(params$db) db <- params$db db[["notifications"]] <- params$db[["notifications"]] %>% filter(anomaly_date > params$start_date) db_summary <- summarize_npds_db(db) plots <- plot_summary(db_summary, type = "ggplot", n_years = 3)
This report is automatically generated based on the data contained in the NPDS notification database. The report gives a brief overview of the notifications sent to state epidemiologists when incidents of public health significance (IPHS) are detected in the National Poison Data System.
r params$start_date
r params$end_date
r db_summary$n
plots[["n_by_year"]]
plots[["sent_to_state_epi"]]
plots[["sent_to_state_epi_by_year"]]
plots[["defintion_id"]]
Analyze words...
plots[["data_completness"]]
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.