### Calcula a variação percentual acumulada em 4 períodos do vetor x informado.
ac4t <- function(x) {
out <- ackt(x, 4)
return(out)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.