#' Fur Elise
#'
#' The song "Fur Elise" by Beethoven.
#'
#' @docType data
#' @name furelise
#' @usage furelise
#' @format A character vector of notes
#' @references \url{http://en.wikipedia.org/wiki/F%C3%BCr_Elise}
#' @examples
#' song <- makesong(furelise, baseduration = 1/3)
#' playsong(song)
NULL
#' Ode to Joy
#'
#' The song "Ode to Joy" by Beethoven.
#'
#' @docType data
#' @name odetojoy
#' @usage odetojoy
#' @format A character vector of notes
#' @references \url{http://en.wikipedia.org/wiki/Symphony_No._9_(Beethoven)}
#' @examples
#' song <- makesong(odetojoy, baseduration = 1/4)
#' playsong(song)
NULL
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.