quadmap (xi = 0.0, a = 4.0, n = 1000)
x <- quadmap (0.2) acf (x, 10)
Run the code above in your browser using DataLab