#' Play wave sound
#'
#' Uses Audio to play a sound effect if available
#' @param fname filename of a .wav sound file
#' @importFrom audio play
#' @importFrom audio load.wave
#' @export
play_audio <- function(fname) {
sfx <- audio::load.wave(fname)
audio::play(sfx)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.