powered by
Periodogram(z)
artfimaSDF
data(sunspot.year) Ip <- Periodogram(sunspot.year) fr <- (1:length(Ip))/length(sunspot.year) plot(fr, Ip, xlab="frequency", ylab="Periodogram")
Run the code above in your browser using DataLab