DF検定について～時系列統計モデルの検証～

# はじめに
**時系列解析とは**
<span class="space">　時系列データを説明できる数理モデルを作ること

例えば東京の気温と雨量が以下のように得られたとして、
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/76c7c42b-5af8-5c01-db4b-a7688045dcd8.png)

```math
y_{気温} =3 \times x_{月} 
```
のような、数式を立てるのが目的です。数式を得ることができれば

1. 未来の予測
1. 原理・本質の理解

をすることができます。

**時系列モデルとは**
前述の数理モデルには様々な方式がありますが、一般的に時系列データの持つ特徴は以下が挙げられます。

```math
時系列データ = 短期の周期変動+周期変動+トレンド+外因性+ホワイトノイズ
```
* 短期の周期変動：前日の気温・数時間前の気温
* 周期変動：年単位の変動
* トレンド：地球温暖化のような恒久的な増加
* 外因性：モデルに取り込めないような突発的なもの
* ホワイトノイズ：温度計の計測誤差

これらの特徴を挙げられます。

**短期の周期変動**
前日の気温と今日の気温はそこまで差がないだろうと考えたとします。
前日の気温にノイズ$\epsilon$を足し他モデルを考えられます。

```math
y_{気温} = y_{前日の気温} + \epsilon
```
こんな感じです。このモデルはARモデルと言われます。自己回帰モデル(Auto regression model)です。

**全てノイズ**
一人あたりの映画視聴時間を考えて見ましょう。
曜日の影響もなし、全てノイズである程度の時間を視聴しているみたいなモデルが立てられます

```math
y_{視聴時間} = C + \epsilon
```

これがMAモデルです。

前日、面白かった映画を途中まで見ていたから今日も続きを見ようと考えた場合は

```math
y_{視聴時間} = C + \epsilon +  \beta \epsilon_{前日} 
```
みたいに立てられます。

**季節性**
気温は年単位で変動しています。月ごとにサンプルしている場合は12ヶ月前の気温データから、今月の気温が予想できます。これは一見ARモデルです。しかし仮に、次のようなモデルを考えた場合はどうなるでしょう。

```math
今月の気温 = (去年の同月 \pm 1月　の気温の平均)
```
例えば、11月の気温を予測するために、去年の10~12月の気温を平均するモデルです。

これはARモデルでも表現できますが、12ヶ月分のジャンプ＋ARモデルと考えます。

同じ配信で別画面で開いて音声が少しズレている状態が季節性
状態の影響がジャンプして与えられるという事自体に意味があるときそれは季節性なのだ。

**トレンド**
地球温暖化により毎年0.1℃程度温度上昇しているとしましょう。これをモデル化すると

```math
今年の気温 = 去年の気温 + 0.1 + ノイズ
```
になります。比例的に増加していきます。この性質をトレンドと呼びます。

これはARモデルですが、さきほどのARモデルと違い、時間が立つほど気温は増加し、最終的には爆発します。

ARモデルから導かれるAR特性方程式の解の絶対値が1以上であれば、値は爆発します。
この中で特に解の絶対値が1である統計モデルを単位根過程と呼びます。

**ARIMAモデル**
ここまでの統計モデルを合体したモデルは$ARIMA$モデルと呼ばれます。


**モデルの推定**
$ARIMA$モデルの同定の流れは

1. 単位根検定（DF検定・ADF検定・PP検定）を行うことで差分過程が定常過程となるまで差分を繰り返す
1. 差分回数は同じで複数の$ARIMA$統計モデルに対して実際の現象データに当てはめ、AIC情報量等を用いてARMA次数を決定
1. 得られた定常過程とARMA次数に対して最尤法またはカルマンフィルタを使いパラメタ推定

**モデルの検証**

最後に時系列統計モデルの検証を行います。


# 今回のお話：DF検定
モデルの推定に必要になる単位根検定の基礎であるDF検定について説明します。

**目的**
以下の時系列モデルに従うとして、

```math
x_{t} = \rho x_{t-1} + \epsilon_t
```

```math
\epsilon_t \in N(0,\sigma^2 )
```
以下のような時系列データ$x_0 ,\cdots , x_n$に対して

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/6163533d-bcdd-29b7-221d-fc488c4f0d95.png)
$\rho = 1$か$\rho < 1$であるかを判別することがDF検定の目的です。

**データ例**

```math
\rho = 1,\epsilon_t \in N(0,1)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/853d80ab-0fc5-50d6-d2c3-856e6ffbfc8d.png)


```math
\rho = 1,\epsilon_t \in N(0,10)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/8db2000a-5da1-eb7d-7f2b-9eeb5e7bff1e.png)

```math
\rho = 0.9,\epsilon_t \in N(0,10)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/98b04ab3-fad6-4e0c-2c96-d8c60105f680.png)

```math
\rho = 0.99,\epsilon_t \in N(0,10)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/e4cc06bb-cbac-9e4d-c4eb-63a1007cee3f.png)

```math
\rho = 0.99,\epsilon_t \in N(0,1)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/9e5190fd-a08a-e082-beb2-9b51d7668a86.png)

```math
\rho = 0.999,\epsilon_t \in N(0,1)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/c8211cd7-1295-a7fb-84f9-ccdcd4183363.png)

```math
\rho = 0.9999,\epsilon_t \in N(0,1)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/94145c12-72d7-717a-618e-2e7afb4d1688.png)


```math
\rho = 0.9999,\epsilon_t \in N(0,10)
```

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/1345ffe9-71b5-ef93-9574-366d2d8214d5.png)

```math
\rho = 1.001,\epsilon_t \in N(0,10)
```

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/f12d1835-1b2e-4f73-6798-50dcc0afa63e.png)

```math
\rho = 1.0001,\epsilon_t \in N(0,10)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/22fec950-6125-abce-0918-5bb80e1a2484.png)

**わかること**

1. $\rho > 1$だと数値が発散する。
1. $\rho < 1$だと分散は時刻によらなくなる
1. $\rho = 1$だと分散は時刻に比例する
1. $\rho = 1$に近づけば$\rho=1$のグラフに近くなる（当然か）

3種のグラフには見た目に明らかに違いがあったので人間であれば判定できそうです。

**見た目で判断できるかどうか**

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/bbfbd641-f86b-f373-ce09-f83acc23bc7a.png)

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/933939f1-f45f-9d96-7270-66c2c6eca704.png)

上が
```math
\rho = 0.99,\epsilon_t \in N(0,1)
```
下が
```math
\rho = 1.00,\epsilon_t \in N(0,1)
```
になります。

$\rho$にほとんど差がない場合は見た目そこまで差がないです。


そこで、数量的に検証しようとするのがDF検定です！

**1以上について**
先に、前提として$\rho > 1$だと数値が発散するため、以後$\rho > 1$は考えません。

```math
\rho = 1.001,\epsilon_t \in N(0,10)
```

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/f12d1835-1b2e-4f73-6798-50dcc0afa63e.png)

**本質的な違い**

$\rho = 1$だと、分散は時刻に比例
$\rho < 1$だと、分散は一定


# 相関検定
$\rho < 1$を仮定する

```math
x_{t} = \rho x_{t-1} + \epsilon_t
```

```math
\epsilon_t \in N(0,\sigma^2 )
```

のモデルに対して、$\rho$は$x_t$と$x_{t-1}$の自己相関係数であると考えられます。

```math
\rho = \frac{\sum x_{t-1} x_t}{\sum x_t^2 }
```

**解法**
```math
x_{t} = \rho x_{t-1} + \epsilon_t
```
より

```math
Var(x_{t} )  = \rho^2 Var(\rho x_{t-1})  + Var(\epsilon_t)
```

```math
Var(x_{t} )  = \rho^2 Var(\rho x_{t-1})  + \sigma^2 
```

```math
\therefore Var(x_{t} )  = \frac{ \sigma^2 }{1- \rho^2}
```
値が収束する。


よって、分母はサンプル数をTとすると

```math
\sum^T_{t=1} x_t^2 　= \frac{ \sigma^2 }{1- \rho^2} T
```

--- 

分子は

```math
\sum x_{t-1} x_t = \sum x_{t-1} (\rho x_{t-1} + \epsilon_t)
```

```math
 = \sum x_{t-1} \rho x_{t-1} + \sum x_{t-1} \epsilon_t
```

```math
 = \rho \frac{ \sigma^2 }{1- \rho^2} T + \sum x_{t-1} \epsilon_t
```

ここまでは簡単にわかる。

無相関の確率変数の積の分散は、積になる

```math
V[XY] = V[X] V[Y]
```

さらに、

```math
\epsilon_t \in N(0,\sigma^2 )
```

```math
Var(x_{t} )  = \frac{ \sigma^2 }{1- \rho^2}
```
がわかっているので。十分に収束していれば

```math
Var(x_{t-1} )  = \frac{ \sigma^2 }{1- \rho^2}
```
と言える。よって

```math
 x_{t-1}  \epsilon_t 　\sim  N ( 0, \frac{ \sigma^4 }{1- \rho^2} )
```
といえる。

```math
 \sum x_{t-1} \epsilon_t 　\sim  N ( 0, \frac{ \sigma^4 }{1- \rho^2} T  )
```

---

```math
\rho = \frac{\sum x_{t-1} x_t}{\sum x_t^2 }
```
にいままでの結果を代入すると

```math
\frac{\sum x_{t-1} x_t}{\sum x_t^2 } = \frac{\rho \frac{ \sigma^2 }{1- \rho^2} T + N ( 0, \frac{ \sigma^4 }{1- \rho^2} T  )}{ \frac{ \sigma^2 }{1- \rho^2} T }=  \rho + N(0,(1-\rho^2)/T)
```

が得られる。

**検定**
帰無仮説として$\rho = 0$を立てれば、統計量

```math
\frac{1}{ \sqrt{T}}\frac{\sum x_{t-1} x_t}{\sum x_t^2 }  \sim   N(0,1)
```
であることから$\rho = 0$検定ができる。ただし、分布の収束を前提としている箇所が複数出てきているので、サンプル数$T$の大きさによっては使えない。単位根過程$\rho=1$に至っては分散が発散し、収束しないため使えない。

# 回帰係数検定
次に、回帰係数を推定し$\hat{\rho}$を計算したときの、回帰係数$\hat{\rho}$の分布と検定を考えてみよう。

推定誤差$e_t = y_t  - \hat{\rho} y_{t-1} $の分布はどうなるか。

```math
\hat{\rho}
=
\frac{\sum x_{t-1} x_t}{\sum x_t^2 } = \frac{\rho \frac{ \sigma^2 }{1- \rho^2} T + N ( 0, \frac{ \sigma^4 }{1- \rho^2} T  )}{ \frac{ \sigma^2 }{1- \rho^2} T }=  \rho + N(0,(1-\rho^2)/T)
```
より


```math
\rho - \hat{\rho} = N(0,(1-\rho^2)/T)
```
となる。

```math
e_t = y_t  - \hat{\rho} y_{t-1}  =  \rho y_{t-1} + \epsilon_t   - \hat{\rho} y_{t-1}  = 
(\rho - \hat{\rho} ) y_{t-1}  + \epsilon_t
```
よって

```math
e_t \sim N(0,\frac{(1-\rho^2) y_{t-1}^2}{T} + \sigma^2 )
```
とわかる。

```math
 \sum e_t^2 　\rightarrow \sum \frac{(1-\rho^2) y_{t-1}^2}{T} + \sigma^2 T
```
に収束すると考えられる。新たに$\sigma_{\rho}^2$を定義する。

```math
\sigma_{\rho}^2 =  \frac{\sum e_t^2}{\sum y_{t-1}^2 } 　\rightarrow  \frac{(1-\rho^2) }{T} + \frac{\sigma^2 T}{\sum y_{t-1}^2 } \rightarrow  \frac{(1-\rho^2) }{T}
```

第二項は$\sigma^2  T >> \sum y_t  $と考えられれれば$0$に収束することを使った。

```math
\rho - \hat{\rho} = N(0,(1-\rho^2)/T)
```
と比較しながら、統計量$t$を次のように定義する。

```math
t = \frac{\rho - \hat{\rho}}{\sigma_{\rho}} \sim N(0,1)
```
都合のいいことに$N(0,1)$に収束するのである。

言いたいこととしては、

```math
\sigma_{\rho}^2 =  \frac{\sum e_t^2}{\sum y_{t-1}^2 } 
```
を計算すれば、$\hat{\rho}$の推定誤差分散になるということである。

---
**まとめ**

```math
\hat{\rho} = \frac{\sum x_{t-1} x_t}{\sum x_t^2 }
```

```math
\rho - \hat{\rho} \sim  N(0,\frac{\sum e_t^2}{\sum y_{t-1}^2 } )
```
# DF検定
本題に入ろう。
ここまでの議論は分散の収束を原理としている。単位根過程において分散は発散するため、前述2つの方法は使えない（使えないならなんで説明したねんー＞前述の統計量を単位根過程に適用した場合を考えるため）。ここからは、単位根過程を仮定した場合の分布・検定を考えていく。

目的としては、帰無仮説として$\rho = 1$とした場合に使える統計量を考えることだ。

## ブラウン運動
DF検定では単位根過程のうちブラウン運動のみを対象とした検定である。その他の単位根過程の検定はDF検定を拡張した、ADF検定を用いて行うことになる。今回はDF検定のみを考えよう。まず、ブラウン運動は次のように定義される。

```math
x_0 = 0
```

```math
x_{t_1} = x_{t_2} + N(0,\sigma^2 (t_1 - t_2))
```

移動量は経過時間に比例して増加するという考えだ。先程の$\rho = 1$と同じモデルである。

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/e8e7d850-e2d5-f9fe-963d-e4f09d47c73c.png)

シミュレート時間間隔$dt$の大小で時系列データの見た目も変わる。

$x_t$のヒストグラムを作ると

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/0078ab15-20b0-66da-799f-687213cdf619.png)

こんな感じで正規分布に従う。シミュレーション上$dt$の単位が入ることになるが、どんな$dt$でもこの正規分布は変わらない。

シミュレーションは以下のようにできる。

```Python
t = 0
x = 0

while True:
    
    dx = random.gauss(0,sigma*sq_dt)
    x = x + dx    

    if t > T:
        break
    else:
        t = t + dt
```
単純にシミュレーション間隔$dt$ごとにホワイトノイズを足すだけである。

グラフ表示まで全体のプログラム以下のようになる。

<details>
<summary>プログラム（クリックで開く）</summary>

```Python
import math 
import numpy as np
import random
import matplotlib.pyplot as plt
import scipy.stats as st
from scipy.stats import norm


dt = 0.01
T = 1
sigma = 10
N = 10**5

t = 0
x = 0
sq_dt = math.sqrt(dt)

save_x = np.empty([0]) #1次元から配列生成:保存用
save_x2 = np.empty([0]) #1次元から配列生成:保存用
save_t = np.empty([0])

for i in range(N):
    x = 0
    t = 0
    while True:
        
        dx = random.gauss(0,sigma*sq_dt)  # 平均、標準偏差
        x = x + dx    
        
        if i == 0:
            save_x2 = np.append(save_x2,x)
            save_t = np.append(save_t,t)
        
        if t > T:
            break
        else:
            t = t + dt
            
    if i % 1e+4 == 0:
        print(N)
            
    save_x = np.append(save_x,x)

# ヒストグラム
fig = plt.figure(figsize = (10,8))

ax = fig.add_subplot(2, 1, 1)
ax.plot(save_t,save_x2)

#xx = np.linspace(0, 2.5,501)
#ax.plot(xx, st.gamma(11, 0, 1/13.).pdf(xx))

ax = fig.add_subplot(2, 1, 2)
ax.hist(save_x, bins=100, histtype='barstacked', ec='black',density=True)

a=40
xx = np.linspace(-1*a, a, 501)
p = norm.pdf(x=xx, loc=0, scale=sigma) #平均・標準偏差
ax.plot(xx, p,lw = 2)



plt.show()  
```
</details>

**ρの推定**

先程の、$\rho$の推定の式をシミュレーションに適用してみよう

```math
\hat{\rho} = \frac{\sum x_{t-1} x_t}{\sum x_t^2 }
```

この分布数学的に求めるのは大変難しいため、今回はプログラムでシミュレートすることで$\hat{\rho}$の分布を求めてみる。先程は以下の式に従ったがどうなるのか・・・

```math
\rho - \hat{\rho} \sim  N(0,\frac{\sum e_t^2}{\sum y_{t-1}^2 } )
```

---
まず、**分母**


```math
\sum x_t^2 
```

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/e0d51d6b-6fe2-35e0-fdd4-d3fa915483e4.png)

```math
Var[\epsilon_1 + \epsilon_2] = Var[\epsilon_1] + Var[\epsilon_2] + Cov[\epsilon_1,\epsilon_2]
```
2つは無相関であるので、

```math
Var[\epsilon_1 + \epsilon_2] = Var[\epsilon_1] + Var[\epsilon_2]= \sigma^2 2dt
```
となる。


```math
x_2^2+ x_1^2 = 2 x_1^2 + \epsilon_2^2 = 2\epsilon_1^2 + \epsilon_2^2 
```
一般化すれば

```math
\sum x_t^2 = \sum i \epsilon_i^2 
```
カイ二乗分布に近いけど違う分布になります。

---
**分子**

```math

\sum x_{t-1} x_t
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/42b84a55-b974-96f1-bd18-0ed2e56e6bc3.png)

あまり変わりませんね。

---
**$\rho$の分布**

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/80fbc3ee-f168-fc39-3f8c-4cf61253ae45.png)

```
average :  0.973625348374121
median :  0.9805936049706372
```
平均も中央値もほぼ1になることがわかった。
また、今回$\rho = 1$の過程に対して$\hat{\rho}$の推定をしたのにも関わらず平均値は$1$にならなかった。
つまり、完璧な単位根過程であっても推定値は$1$にならないのである。

そしてこの、確率密度分布をDF分布と呼ぶ。
ヒストグラムの分解能を上げれば

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/ea68d8bd-fbeb-b24d-b4b4-d904bafbb671.png)
これがDF分布である。正式名称Dickey-Fuller分布

---

シミュレーションのパラメータを変えた場合もいくつか示すと

$dt = 0.007$

```math
\epsilon_t  \sim N(0,1)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/53708118-cb51-b65c-4bf8-accdf6d5b2ba.png)


```math
\epsilon_t  \sim N(0,100)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/ea68d8bd-fbeb-b24d-b4b4-d904bafbb671.png)


```math
\epsilon_t  \sim N(0,10000)
```

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/1e0a3ccc-c54f-ec22-e674-191377ae2e12.png)

$dt = 0.001$に下げる

```math
\epsilon_t  \sim N(0,1)
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/e0dfb6b3-0761-4902-5e86-a05f54f1d824.png)

$dt$を下げることでサンプリング回数が増えるため、推定精度が向上するため分布の形は変わらないが、横軸が1に近づく。

以上より、推定誤差分散で正規化したものがDF分布になる。



---
**推定誤差**の分布

```math
\rho - \hat{\rho} \sim  N(0,\frac{\sum e_t^2}{\sum x_{t-1}^2 } )
```
であった。
$\rho = 1$の過程に対してシミュレーション上で何度も推定を行い$\hat{\rho} $を求め、$e_t$を求めて

```math
e_t = x_t - \hat{\rho} x_{t-1}
```

以下の誤差推定値の分布を求める

```math
\hat{\sigma^2 } = \frac{1}{T} \sum e_t^2
```


![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/327f030b-7625-3bf6-341b-e04f8b67f749.png)

今回のシミュレーションでは
```math
x_{t} =  x_{t-1} + \epsilon_t
```

```math
\epsilon_t \in N(0,100 )
```
としてシミュレーションした。ちゃんと真値$100$周辺に分布している。



---

推定誤差を推定誤差の推定分散で正規化した値

```math
\tau = \frac{ \rho - \hat{\rho} }{ \frac{\sum e_t^2}{\sum x_{t-1}^2 } }
```
の分布は

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/8f8f513b-e708-4acb-db1f-b01332bc3659.png)

となる。

--- 

<details>
<summary>全体のプログラム（クリックで開く）</summary>

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/727e45cd-bb8c-f430-ffe5-93e0dd7c17ae.png)




```Python
# -*- coding: utf-8 -*-
"""
Created on Wed Oct  4 00:31:58 2023

単位根過程をシミュレート

シグマの中身を計算：分布導出

OLS推定量を計算：分布導出、正規分布と比較
"""
import math 
import numpy as np
import random
import matplotlib.pyplot as plt
import scipy.stats as st
from scipy.stats import norm
from scipy.stats import chi2

dt = 0.007
T = 1
sigma = 10
N = 10**4

t = 0
x = 0
sq_dt = math.sqrt(dt)

save_x = np.empty([0]) #1次元から配列生成:保存用
save_t = np.empty([0])

save_x1 = np.empty([0])

x2 = 0
save_x2 = np.empty([0])

x3 = 0
save_x3 = np.empty([0])

x4 = 0
save_x4 = np.empty([0])

save_x5 = np.empty([0])

save_x6 = np.empty([0])

for i in range(N):
    x = 0
    t = 0
    x2 = 0
    x3 = 0
    x4 = 0
    save_x = np.empty([0]) #1次元から配列生成:保存用
    save_t = np.empty([0])
    
    while True:
        
        dx = random.gauss(0.0,sigma*sq_dt)  # 平均、標準偏差
        
        x3 = x3 + x*(x + dx)
        
        x = x + dx 
        
        x2 = x2 + x**2 
        
        #if i == 0:
        save_x = np.append(save_x,x)
        save_t = np.append(save_t,t)
        
        if t > T:
            break
        else:
            t = t + dt
            
    if i % 1e+3 == 0:
        print(i)
            
    save_x1 = np.append(save_x1,x)
    save_x2 = np.append(save_x2,x2)
    save_x3 = np.append(save_x3,x3)
    
    x4 = x3/x2
    save_x4 = np.append(save_x4,x4)
    
    e = np.append(0,save_x)[:-1] - x4 * save_x
    x5 = sum(e**2) / T
    
    save_x5 = np.append(save_x5,x5)
    
    
    x6 = (1-x4)/math.sqrt(x5)
    save_x6 = np.append(save_x6,x6)

    
    

# 代表グラフ

fig = plt.figure(figsize=(9, 7))

ax = fig.add_subplot(1, 1, 1)
ax.hist(save_x6, bins=100, histtype='barstacked', ec='black',density=True)

ax.set_xlabel("tau")
ax.set_ylabel("f")

print("average : ", np.mean(save_x6))
print("median : ", np.median(save_x6))
#ax.set_xlim([0,np.max(save_x3)])

plt.show() 


# ヒストグラム
fig = plt.figure(figsize=(7, 20))

n=7

ax = fig.add_subplot(n, 1, 1)
ax.plot(save_t,save_x)


ax = fig.add_subplot(n, 1, 2)
ax.hist(save_x1, bins=100, histtype='barstacked', ec='black',density=True)

a=sigma*3*math.sqrt(T)
xx = np.linspace(-1*a, a, 501)
p = norm.pdf(x=xx, loc=0, scale=sigma*math.sqrt(T)) #平均・標準偏差
ax.plot(xx, p,lw = 2)


ax = fig.add_subplot(n, 1, 3)
ax.hist(save_x2, bins=300, histtype='barstacked', ec='black',density=True)

ax.set_xlabel("x^2")
ax.set_ylabel("f")
ax.set_xlim([0,np.max(save_x2)*0.5])

# a=np.max(save_x2)
# xx = np.linspace(-1*a*0.01, a, 501)
# p = chi2.pdf(x=xx/(sigma**2 * sq_dt), df = N) / sigma**2 / dt
# ax.plot(xx, p,lw = 2)


ax = fig.add_subplot(n, 1, 4)
ax.hist(save_x3, bins=100, histtype='barstacked', ec='black',density=True)
ax.set_xlabel("x(t-1) * x(t)")
ax.set_ylabel("f")

ax = fig.add_subplot(n, 1, 5)
ax.hist(save_x4, bins=600, histtype='barstacked', ec='black',density=True)

ax.set_xlabel("ρ")
ax.set_ylabel("f")

print("average : ", np.mean(save_x4))
print("median : ", np.median(save_x4))

ax = fig.add_subplot(n, 1, 6)
ax.hist(save_x5, bins=100, histtype='barstacked', ec='black',density=True)
ax.set_xlabel("sum(e^2) * 1/T")
ax.set_ylabel("f")

ax = fig.add_subplot(n, 1, 7)
ax.hist(save_x6, bins=100, histtype='barstacked', ec='black',density=True)
ax.set_xlabel("tau")
ax.set_ylabel("f")


plt.show()  

```

</details>


# トレンドのあるランダムウォーク

```math
x_{t} =  x_{t-1} + 0.05 + \epsilon_t
```

```math
\epsilon_t \in N(0,100 )
```
としてシミュレーション場合

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/a436340c-14e4-6bf7-a5f2-6bfdf53dfdd3.png)

線形トレンドが見られる。

---
ランダムウォークではなくトレンドのあるARモデルでも同じような時系列モデルが作れる

```math
x_t = 0.9 x_{t-1}  + 0.05t + \epsilon_t
```

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/4431a79e-6818-0b7a-c0a5-e37693611858.png)


```math
x_t = 0.98 x_{t-1}  + 0.05t + \epsilon_t
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/f5b66133-26ad-cfbc-8fdb-e3afdd9accd5.png)



```math
x_t = 0.7 x_{t-1}  + 0.05t + \epsilon_t
```
![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/cf5adfbd-67fc-71f0-b91f-54f8c70a7c51.png)


ARモデル＋線形トレンドの場合、分散は時刻によらなくなるので、各線のばらつき具合は時刻$t$によらなくなっている。

---

**$\rho$の計算結果**

```math
x_t =  x_{t-1}  + 0.05 + \epsilon_t
```

```math
\epsilon_t \in N(0,100 ),T=10^4
```

このトレンドのあるブラウン運動に対して

```math
\hat{\rho} = \frac{\sum x_{t-1} x_t}{\sum x_t^2 }
```

トレンドのないブラウン運動に対する係数の推定値を計算して、分布を求める


![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/9c8c6a28-9a68-1308-59b2-6b727c256676.png)

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/0bc6a512-b4b4-856f-8510-bf67342124b8.png)

---

```math
\hat{\rho} = \frac{\sum x_{t-1} x_t}{\sum x_t^2 }
```

```math
x_t =  x_{t-1}  + 0.3 + \epsilon_t
```

```math
\epsilon_t \in N(0,100 ),T=10^4
```

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/d481ec12-8681-6828-f864-ab4c1dfb413c.png)

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/e61ad055-d02a-42f0-0861-21f97fdaf71b.png)


これまでの方法で$\rho$を計算するのは問題があるといえる。

## OLS推定量を使用する方法。

```math
x_t = \rho x_{t-1} + \beta t  + \epsilon_t
```
この過程に対して

```math
S = \sum ( x_t - \hat{x_t})^2
```
を最小化するように$\rho,\beta$を推定する。
推定値の分布を求める

---

```math
x_t =  0.3  x_{t-1} + 0.5 t  + \epsilon_t
```

$0.3$,$0.5$がちゃんと推定できている

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/55949653-5e53-cc04-b13c-c3d5a02e4ef2.png)

---

```math
x_t =  x_{t-1} + 0.05  + \epsilon_t
```

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/92c0b080-418e-c30b-dc09-c5b5e6d2d238.png)

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/b3f609c9-56a8-9de3-b79a-dce66ddc0ffc.png)

先程のDF分布とは全く異なる分布となった。

自力で考えてもわからんなぁ～



# ADF,PPについて

単位根過程の中でも一番簡単な過程のみにしかDF検定は使えない。
DF検定を拡張したものがADF検定である。

今後書くかも

# RでDF分布を出してみる

今後書くかも


# まとめ

DF分布をシミュレーションで実際に求めることができた。

![image.png](https://qiita-image-store.s3.ap-northeast-1.amazonaws.com/0/405484/ea68d8bd-fbeb-b24d-b4b4-d904bafbb671.png)
これがDF分布である。正式名称Dickey-Fuller分布