Sys.time()
[1] "2024-04-13 09:33:05 JST"
Rでデータサイエンス
\(\,K\,\)個の量的変数の\(\,t\,\)期の値からなるベクトル過程を以下の通りとする。
\[\textbf{y}_t=\left(y_{1t},y_{2t},\cdots,y_{Kt}\right)^{'}\]
ベクトル過程の依存関係を以下の通り近似的に線形で表す。
\[\textbf{Ay}_t=\textbf{A}_1\textbf{y}_{t-1}+\textbf{A}_2\textbf{y}_{t-2}+\cdots+\textbf{A}_p\textbf{y}_{t-p}+\textbf{A}_z\textbf{z}_{t}+\pmb{\epsilon}_t\quad t=1,2,\cdots,T\]
ここで、
よって、\(\,K\,\)本の各方程式それぞれに含まれる係数パラメータの個数は\[n=K\times p+q\]となり、 \(\,K\,\)本の方程式を対象とする係数パラメータの総個数は\[N=K\times n\]となる。
構造撹乱項ベクトル\(\,\pmb{\epsilon}_t\,\)は以下の性質を持つ定常過程とする。
よって構造撹乱項ベクトル\(\,\pmb{\epsilon}_t\,\)は以下のホワイトノイズとして表せられる。\[\pmb{\epsilon}_t\sim \textrm{WH}\left(\textbf{0},\pmb{\Sigma}_\epsilon\right)\]
構造VARを内生変数である\(\,\textbf{y}_t\,\)について解いた誘導VARは以下の通りとなる。
\[\textbf{y}_t=\textbf{B}_1\textbf{y}_{t-1}+\textbf{B}_2\textbf{y}_{t-2}+\cdots+\textbf{B}_p\textbf{y}_{t-p}+\textbf{B}_z\textbf{z}_{t}+\textbf{u}_t\quad t=1,2,\cdots,T\] 但し、
\[\begin{aligned} &\textbf{B}_i=\textbf{A}^{-1}\textbf{A}_i\quad i=1,2,\cdots,p\\ &\textbf{B}=\textbf{A}^{-1}\textbf{A}_z\\ &\textbf{u}_t=\textbf{A}^{-1}\pmb\epsilon_t \end{aligned}\]
誘導撹乱項ベクトル\(\,\textbf{u}_t\,\)は以下の性質を持つ定常過程とする。
よって誘導撹乱項ベクトル\(\,\textbf{u}_t\,\)は以下のホワイトノイズとして表せられる。\[\textbf{u}_t\sim\textrm{WN}\left(\textbf{0},\pmb{\Sigma}_u\right)\]
構造撹乱項ベクトル\(\pmb{\epsilon}_t\)と誘導撹乱項ベクトル\(\pmb{u}_t\)の間には以下の関係が成り立つ。
\[\begin{aligned} &\textbf{u}_t=\textbf{A}^{-1}\pmb{\epsilon}_t\\ &\begin{split} \textbf{u}_t\textbf{u}^{'}_t&=\textbf{A}^{-1}\pmb{\epsilon}_t\textbf{u}^{'}_t\\ &=\textbf{A}^{-1}\pmb{\epsilon}_t\left(\textbf{A}^{-1}\pmb{\epsilon}_t\right)^{'}\\ &=\textbf{A}^{-1}\pmb{\epsilon}_t\pmb{\epsilon}^{'}_t\left(\textbf{A}^{-1}\right)^{'}\\ \end{split}\\ &\begin{split} \textrm{E}\left(\textbf{u}_t\textbf{u}^{'}_t\right)&=\textrm{E}\left(\textbf{A}^{-1}\pmb{\epsilon}_t\pmb{\epsilon}^{'}_t\left(\textbf{A}^{-1}\right)^{'}\right)\\ &=\textbf{A}^{-1}\textrm{E}\left(\pmb{\epsilon}_t\pmb{\epsilon}^{'}_t\right)\left(\textbf{A}^{-1}\right)^{'} \end{split}\\ &\pmb{\Sigma}_u=\textbf{A}^{-1}\pmb{\Sigma}_\epsilon\left(\textbf{A}^{-1}\right)^{'} \end{aligned}\]