Nothing
acvfPLS<-function(alpha,maxlag){
rasy <- (2^(-1 + alpha)*pi^(1/2 - alpha)*alpha*gamma(alpha/2))/gamma(1/2 - alpha/2)
c(1,rasy*(1:maxlag)^(-alpha))
}
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.