#' Data from the 2017 Australian Marriage Survey
#'
#' Returns the file path to a spreadsheet of results of the 2017 Australian
#' Marriage Survey by the Australian Bureau of Statistics, which asked, "Should
#' the law be changed to allow same-sex couples to marry?"
#'
#' @source
#'
#' Australian Bureau of Statistics:
#' http://www.abs.gov.au/ausstats/abs@.nsf/mf/1800.0
#'
#' @export
ozmarriage <- system.file("extdata", "ozmarriage.xlsx", package = "smungs")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.