Nothing
#' Names of babies in Ontario Between 1917 and 2018
#'
#' A database containing the first names of babies born in Ontario
#' between 1917 and 2018. Counts of fewer than 5 names were suppressed for privacy.
#'
#' @format A database containing 161 703 lines and 4 columns:
#' \describe{
#' \item{year}{Year}
#' \item{sex}{F for female and M for male}
#' \item{name}{Name}
#' \item{n}{Frequency}
#' }
#' @importFrom tibble tibble
#' @source \url{https://data.ontario.ca/dataset/eb4c585c-6ada-4de7-8ff1-e876fb1a6b0b/resource/919b7260-aafd-4af1-a427-38a51dbc8436/download/ontario_top_baby_names_male_1917-2018_en_fr.csv}
#' @source \url{https://data.ontario.ca/dataset/4d339626-98f9-49fe-aede-d64f03fa914f/resource/0c4aec56-b2b8-499b-9739-68ab8a56e69a/download/ontario_top_baby_names_female_1917-2018_en_fr.csv}
#' @examples
#'
#' library(dplyr)
#'
#' # The five most popular girls names in Ontario in 2018
#' onbabynames %>%
#' filter(year == 2018 & sex == "F") %>%
#' arrange(desc(n)) %>%
#' head(5)
#'
#' library(ggplot2)
#'
#' # The popularity of the five most popular girls names in Ontario in 2018
#' # between 1917 and 2018
#'
#' girls2018 <- onbabynames %>%
#' filter(year == 2018 & sex == "F") %>%
#' arrange(desc(n)) %>%
#' select(name) %>%
#' head(5)
#'
#' onbabynames %>%
#' filter(name %in% girls2018$name) %>%
#' ggplot(aes(x = year, y = n, color = name)) +
#' geom_line()
#'
"onbabynames"
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.