#'Amplitude
#'
#'@description Calcula a amplitude de um vetor de dados
#'
#'@usage amplitude(x)
#'
#'@param x vetor de dados
#'
#'@export
amplitude <- function(x)
{
return(max(x)-min(x))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.