Этот пример показывает, как сгенерировать импульсные характеристики из этой векторной модели коррекции ошибок, содержащей первые три лага (VEC (3), см. [135], гл. 6.7):
- 2-D временные ряды. . является 2-D серией средних нулевых Гауссовых инноваций с ковариационной матрицей
Задайте матрицы авторегрессионных коэффициентов модели VEC (3), , и , матрица коэффициентов исправления ошибок , и инновационная ковариационная матрица .
B1 = [0.24 -0.08; 0.00 -0.31]; B2 = [0.00 -0.13; 0.00 -0.37]; B3 = [0.20 -0.06; 0.00 -0.34]; C = [-0.07; 0.17]*[1 -4]; Sigma = [ 2.61 -0.15; -0.15 2.31]*1e-5;
Вычислите матрицы авторегрессионных коэффициентов в модели VAR (4), которая эквивалентна модели VEC (3).
B = {B1; B2; B3}; A = vec2var(B,C);
A
- вектор камеры 4 на 1, содержащий матрицы коэффициентов авторегрессии модели VAR (4) 2 на 2. Камеры A{j}
содержит матрицу коэффициентов для задержки j
в разностном уравнении. Модель VAR (4) с точки зрения а не .
Вычислите импульсные характеристики ошибки прогноза (FEIRs) для представления VAR (4). То есть примите матрицу тождеств по умолчанию для ковариации инноваций. Сохраните импульсные характеристики в течение первых 20 периодов.
numObs = 20; IR = cell(2,1); % Preallocation IR{1} = armairf(A,[],'NumObs',numObs);
IR{1}
массив импульсных характеристик представления ВАРА модели VEC 20 на 2 на 2. Элемент t, j, k является импульсной характеристикой переменной k в момент t-1 в прогнозном горизонте, когда переменная j получила шок в момент 0.
Чтобы вычислить импульсные характеристики, armairf
фильтрует инновационный шок с одним стандартным отклонением от одной серии на себя и все другие серии. В этом случае величина удара составляет 1 для каждой серии.
Вычислите ортогональные импульсные характеристики и предоставьте инновационную ковариационную матрицу. Сохраните импульсные характеристики в течение первых 20 периодов.
IR{2} = armairf(A,[],'InnovCov',Sigma,'NumObs',numObs);
Для ортогональных импульсных характеристик инновационная ковариация управляет величиной фильтрованного шока. IR{2}
соизмеримо с IR{1}
.
Постройте график FEIR и ортогональных импульсных характеристик для всех рядов.
type = {'FEIR','Orthogonalized'}; for j = 1:2 figure; imp = IR{j}; subplot(2,2,1); plot(imp(:,1,1)) title(sprintf('%s: y_{1,t}',type{j})); ylabel('y_{1,t}'); xlabel('Period'); subplot(2,2,2); plot(imp(:,1,2)) title(sprintf('%s: y_{1,t} \\rightarrow y_{2,t}',type{j})); ylabel('y_{2,t}'); xlabel('Period'); subplot(2,2,3); plot(imp(:,2,1)) title(sprintf('%s: y_{2,t} \\rightarrow y_{1,t}',type{j})); ylabel('y_{1,t}'); xlabel('Period'); subplot(2,2,4); plot(imp(:,2,2)) title(sprintf('%s: y_{2,t}',type{j})); ylabel('y_{2,t}'); xlabel('Period'); end
Поскольку инновации ковариации почти диагональны, FEIR и ортогональные импульсные характеристики имеют сходное динамическое поведение ([135], гл. 6.7). Однако шкала каждого графика заметно отличается.