powered by
tfest estimates the transfer function $$V(B) = w_0 * (theta(B)/phi(B)) * B^d$$ that relates the input X_t to the output Y_t.
tfest
tfest( y, x, delay = 0, p = 1, q = 2, um.y = NULL, um.x = NULL, n.back = NULL, par.prefix = "", envir = envir <- parent.frame() )
An object of class tf containing preestimated transfer function parameters.
tf
Output series, a ts object or numeric vector.
Input series, a ts object or numeric vector.
Integer. Number of periods delay (default 0).
Integer. Order of the AR polynomial (default 1).
Integer. Order of the MA polynomial (default 2).
Univariate model for output series, um object or NULL.
Univariate model for input series, um object or NULL.
Integer. Number of backcasts to compute.
Character. Prefix for parameter names.
Environment for evaluating arguments. If NULL, uses calling environment.
Uses prewhitening to estimate initial parameter values.
data(seriesJ) Y <- seriesJ$Y - mean(seriesJ$Y) X <- seriesJ$X - mean(seriesJ$X) umx <- um(X, ar = 3) umy <- fit(umx, Y) tfx <- tfest(Y, X, delay = 3, p = 2, q = 2, um.x = umx, um.y = umy)
Run the code above in your browser using DataLab