Nothing
load.audio.driver <- function(path) .Call(audio_load_driver, as.character(path), PACKAGE="audio")
audio.drivers <- function() .Call(audio_drivers_list, PACKAGE="audio")
set.audio.driver <- function(name) .Call(audio_use_driver, name, PACKAGE="audio")
current.audio.driver <- function() .Call(audio_current_driver, PACKAGE="audio")
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.