data(Nile)
data(WWWusage)
data<- matrix(c(Nile[1:20],WWWusage[1:20]), nrow=2, byrow=TRUE) #creates the data matrix with
#the first 20 values of the
#time series Nile and WWWusage
specdens(data, 0.2, 100, 0.05)
Run the code above in your browser using DataLab