# NOT RUN {
n = 100
X = rar(n)
Y = rar(n)
#estimate regressors in model $Y_t = \sum_{i\in Z} A_i X_{t-i}$
SYX = spectral.density(Y, X)
SXX = spectral.density(X)
R = freqdom.ratio(SYX,SXX, n)
A = invfourier(R)
# }
Run the code above in your browser using DataLab