hosking.sim <- function(n, acvs) { .C(C_hosking, tseries=rnorm(n), as.integer(n), as.double(acvs[1:n]))$tseries }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.