=========================================================

================= Travail à faire ========================

=========================================================

  1. Simuler deux Séries de taille 1000 à partir d’un processsus ARMA (1, 1) à coefficient phi = 0.3 et Têta = 0.5

  2. Etudier la stationnarité

# Importation des library
library(tseries)   # adf.test et kpss.test
## Registered S3 method overwritten by 'quantmod':
##   method            from
##   as.zoo.data.frame zoo
library(vars)
## Warning: le package 'vars' a été compilé avec la version R 4.5.2
## Le chargement a nécessité le package : MASS
## Le chargement a nécessité le package : strucchange
## Warning: le package 'strucchange' a été compilé avec la version R 4.5.2
## Le chargement a nécessité le package : zoo
## 
## Attachement du package : 'zoo'
## Les objets suivants sont masqués depuis 'package:base':
## 
##     as.Date, as.Date.numeric
## Le chargement a nécessité le package : sandwich
## Warning: le package 'sandwich' a été compilé avec la version R 4.5.2
## Le chargement a nécessité le package : urca
## Le chargement a nécessité le package : lmtest
# ==============================================================================
# ===================== Le travail =============================================
# ==============================================================================

# 1) Simulation des données
### Fixer la graine pour la reproductibilité
set.seed(123)

### Paramètres
n = 1000
phi = 0.3
theta = 0.5

### Simulation des deux séries ARMA(1,1)
# serie1 = arima.sim(n = n,
#                     model = list(ar = phi, ma = theta))

serie2 = arima.sim(n = n,
                    model = list(ar = phi, ma = theta))

serie1 = 0.5 * serie2 + rnorm(1000)
  
### Faisons une petite visualisation
par(mfrow = c(2, 1))
plot(serie1, main = "Série ARMA(1,1) - Série 1")
plot(serie2, main = "Série ARMA(1,1) - Série 2")

# 2) Etude de la stationnarité

## Méthode de Dickey-Fuller (ADF))

adf_serie1 <- adf.test(serie1)
## Warning in adf.test(serie1): p-value smaller than printed p-value
adf_serie2 <- adf.test(serie2)
## Warning in adf.test(serie2): p-value smaller than printed p-value
## Méthode de KPSS

kpss_serie1 <- kpss.test(serie1)
## Warning in kpss.test(serie1): p-value greater than printed p-value
kpss_serie2 <- kpss.test(serie2)
## Warning in kpss.test(serie2): p-value greater than printed p-value
## Affichage des résultats
adf_serie1
## 
##  Augmented Dickey-Fuller Test
## 
## data:  serie1
## Dickey-Fuller = -10.391, Lag order = 9, p-value = 0.01
## alternative hypothesis: stationary
adf_serie2
## 
##  Augmented Dickey-Fuller Test
## 
## data:  serie2
## Dickey-Fuller = -8.9692, Lag order = 9, p-value = 0.01
## alternative hypothesis: stationary
kpss_serie1
## 
##  KPSS Test for Level Stationarity
## 
## data:  serie1
## KPSS Level = 0.036098, Truncation lag parameter = 7, p-value = 0.1
kpss_serie2
## 
##  KPSS Test for Level Stationarity
## 
## data:  serie2
## KPSS Level = 0.048007, Truncation lag parameter = 7, p-value = 0.1

D’après la méthode de Dickey-Fuller, les p-value étant iférieurs à 0,5, ainsi, on rejette l’hypothèse H0 de non satationnarité des séries. Ce résultat est confirmé par la méthode de KPSS avec une p-value supérieur à 0, 5

# Définition de la série
serie = cbind(serie1, serie2)
serie
## Time Series:
## Start = 1 
## End = 1000 
## Frequency = 1 
##            serie1       serie2
##    1  2.183991221 -0.464432303
##    2 -0.044158342 -1.458713160
##    3 -1.060310481 -1.226702344
##    4  3.114011202  0.633240109
##    5  3.413139403  1.161826759
##    6 -0.754098620  0.929226392
##    7  0.763950135  0.589836359
##    8 -0.373021353 -0.323548869
##    9  0.893015101  1.411927909
##   10  1.134985438  1.814885419
##   11 -1.848513609 -1.173226292
##   12 -0.031370702 -0.633920564
##   13  1.593102550 -0.312289626
##   14 -0.863043153 -1.397906298
##   15 -0.748556039 -1.171258657
##   16  0.655387255 -1.486369503
##   17  0.054494089 -1.687804304
##   18 -2.396407905 -1.495826174
##   19 -0.995423425 -2.447960797
##   20  1.283573310 -0.739947850
##   21  1.590417492  0.350282285
##   22 -0.058231242 -0.956365693
##   23  0.920139180  0.397836745
##   24 -0.610573859  1.172722705
##   25  0.435120287  0.269977439
##   26 -0.540157360  0.828583151
##   27  0.329117564  1.574271263
##   28  1.802068286  1.732929204
##   29 -0.327238334  1.619309556
##   30  0.958933575  1.384030647
##   31  0.743460195  0.630256310
##   32 -0.019008843 -0.147841626
##   33  1.533286412 -0.577804821
##   34 -1.551489291 -1.058283926
##   35  0.169752289 -0.872755945
##   36 -0.904521455 -1.631181774
##   37  0.262619385  1.046903257
##   38  1.767346713  2.606510958
##   39 -0.888987739  0.262825703
##   40 -1.756246624 -0.885591416
##   41 -0.961368474 -0.933775196
##   42  1.885009591  0.266504883
##   43  0.249047253  0.386564958
##   44  0.495236132  0.327603468
##   45 -0.091649867  0.196393542
##   46  0.471379846  0.001774228
##   47 -0.277829881  1.347699324
##   48  1.589330443  0.862839953
##   49  1.415923809  1.662437098
##   50 -0.952346009 -0.291786373
##   51 -0.084096036 -0.277298564
##   52  0.882817394  0.332971549
##   53  0.746611060  0.377760155
##   54  1.782403173  0.600938314
##   55 -0.679098864 -0.132222218
##   56  0.804118728 -0.624035776
##   57  0.350353106 -1.372389808
##   58 -1.158881062 -1.992795860
##   59 -1.391029558 -0.830205730
##   60 -0.913689001  0.350912380
##   61  0.648978373  0.382382830
##   62  0.460615481  1.063484430
##   63  3.194234541  2.830263749
##   64  1.226683111  1.383090301
##   65 -1.441823559 -2.139757368
##   66 -1.420928810 -0.790773124
##   67 -0.804183393 -0.443563438
##   68 -0.244950622 -1.175678029
##   69 -0.286502821  0.328863653
##   70  0.677566007  0.326671774
##   71 -0.966889394 -1.265102684
##   72 -0.509853000 -0.808586181
##   73 -0.875917411 -0.290815477
##   74  1.829580516 -0.150926138
##   75  0.504064058  0.342884653
##   76  0.193056423 -0.075154435
##   77 -1.473612314  0.436500202
##   78  0.776117786  0.232651773
##   79 -0.877956481  0.291334215
##   80 -0.216456445  1.350130260
##   81  1.612661209  1.388640075
##   82 -0.298575055  0.308251182
##   83 -1.209213690  1.078317180
##   84  2.715605520  1.891402819
##   85 -1.571122059  1.612569733
##   86  1.071162097  0.996701135
##   87  0.912484315 -0.209529868
##   88 -0.139047642  0.983840450
##   89  0.631896437  0.375218772
##   90  1.439014804  1.999768831
##   91  2.653727039  3.226207772
##   92  1.233333031  1.498467286
##   93 -0.592249226 -0.694730894
##   94  0.199973917 -1.432036282
##   95  0.536657128 -0.527930457
##   96 -1.074883615 -0.276629161
##   97 -1.677726077 -0.553877287
##   98 -0.485498987 -1.291553053
##   99 -0.728113837 -0.908302924
##  100 -1.525493717 -1.079909209
##  101 -1.108252788 -2.384366934
##  102 -2.284750311 -1.929507569
##  103  0.236241890  0.150031078
##  104 -0.660348055 -0.070839335
##  105  1.106683794  0.299039041
##  106  1.812394724 -1.224188835
##  107 -1.531859229 -1.231759970
##  108  1.118713286  0.122098230
##  109  1.123892944  0.597486433
##  110  0.147555178  0.435498805
##  111 -0.682255509 -0.457218270
##  112  0.921696291 -1.307222831
##  113 -2.926031725 -1.841147813
##  114 -1.116575863 -0.946762142
##  115 -2.023183423 -1.172679958
##  116  0.737264070 -1.316098738
##  117 -0.638803700 -0.896200536
##  118  0.198806675  1.446955748
##  119  3.536078387  0.704067825
##  120  0.010278717  0.120631969
##  121 -0.327827449  0.231843726
##  122 -0.126796296 -0.853323091
##  123 -1.972541286 -0.808233331
##  124  1.073516051  1.166426816
##  125  0.665690562  1.523707527
##  126  0.830573726  0.724097207
##  127 -1.074696241 -0.184651209
##  128 -2.182929342 -2.319891001
##  129 -0.989041512 -0.591253698
##  130 -1.304163360 -1.072347573
##  131  1.143011568 -0.312076797
##  132  2.671872705  2.185454286
##  133 -0.073744498  0.166294909
##  134 -0.344073447  0.029726228
##  135 -0.280232557  0.097612547
##  136 -0.767743092 -1.673959140
##  137 -1.304559504 -2.802927475
##  138 -1.309839734 -3.199748243
##  139 -1.892478482 -2.291599082
##  140 -2.054240674 -2.414688571
##  141  0.813393868 -0.767367591
##  142  0.558301164  2.213857050
##  143  0.516636250  0.427181109
##  144  0.079218437  0.272377942
##  145 -0.335536868  1.244625047
##  146  1.136117516  1.090111214
##  147 -0.084516104 -0.515241955
##  148  1.010676608 -0.778213497
##  149 -0.169333259 -0.573585688
##  150 -0.206187679  0.250716159
##  151  0.270430342 -0.015729142
##  152 -0.792574016  0.786035266
##  153 -0.661035846  0.349716415
##  154  0.995441232  0.970335961
##  155 -0.448981144 -0.231720485
##  156 -0.993090893 -1.854259894
##  157  0.912120463  2.054684344
##  158  0.259521223  1.820067683
##  159 -1.700779108  0.635819102
##  160  0.837049570  0.976429200
##  161  0.825355993  0.127432971
##  162 -1.132115424  0.313201623
##  163  1.843080737  0.721356036
##  164  0.477909107  0.185508567
##  165  1.348267970  0.013255350
##  166 -0.955892537  0.002555868
##  167  1.222873805  2.112185033
##  168  0.378258723  0.956545363
##  169  0.178657079 -1.179700706
##  170 -1.007919541 -0.864119946
##  171  0.024971811  0.070138965
##  172 -1.472256377  0.612805543
##  173 -0.805752408 -0.056261930
##  174 -0.529659806 -1.309387379
##  175 -0.536968545  0.338705895
##  176  0.148207499  0.383553969
##  177 -0.930561907 -0.925271866
##  178  0.133621356 -0.946617560
##  179  0.868837835 -0.599300947
##  180 -0.406730384  0.831542058
##  181  0.137543469  0.889160055
##  182  1.971346482  1.063170448
##  183 -2.100580249  0.196686010
##  184 -0.307935240  0.023805104
##  185  1.959543421 -0.210321726
##  186  2.128162096 -0.130855945
##  187 -0.287068865 -0.887328377
##  188 -1.875949813 -2.024681726
##  189  0.532661470  0.734408100
##  190  0.257044577  1.819637946
##  191  1.250304499 -0.405025566
##  192 -1.485637289 -1.358309267
##  193 -0.576366316 -1.898555823
##  194  1.138101854  1.036503560
##  195  0.603874449  2.722769219
##  196  1.455470780  1.207892197
##  197 -0.361435376  0.772989190
##  198  0.674816749  0.089153839
##  199  0.768326275 -0.656670717
##  200 -1.600306673 -1.223727500
##  201  0.429976573 -1.356036936
##  202 -0.016138995  0.946787753
##  203  0.822084356  1.055461934
##  204  0.406272349  0.408869754
##  205 -0.214210899  0.425970974
##  206  1.009158313  1.482110886
##  207 -0.958027238  0.544807374
##  208 -0.679685299 -1.087096854
##  209  1.252447982  0.853314301
##  210 -1.847784879  0.652679540
##  211 -1.861848046 -0.747843717
##  212 -2.073017167 -1.822159219
##  213 -2.813839718 -2.449500047
##  214 -0.556007638 -1.951181355
##  215 -1.120106014 -0.254355329
##  216 -1.493279861  1.342534449
##  217  0.195067614  1.665272758
##  218 -0.145775898  0.489718707
##  219  0.869203924  0.024836901
##  220 -1.437387348 -0.667270425
##  221  0.526440495 -1.269697521
##  222  0.470928797  0.145132162
##  223  0.097488317 -0.529727681
##  224 -0.208235984  1.288579372
##  225  2.590618480  1.273901200
##  226  0.111503863  0.551549390
##  227 -2.057794321 -0.465793474
##  228 -0.745551764 -1.083390584
##  229 -2.899057897 -1.929227653
##  230 -1.020610991 -1.420201750
##  231 -0.471497410 -0.098540814
##  232  0.933946342  0.504233302
##  233  0.775439024 -0.468114324
##  234 -1.386017221 -1.319824512
##  235  0.159880340 -1.292457057
##  236  1.852935206  0.857224193
##  237 -0.850197019 -0.132106028
##  238 -1.046071973 -0.787335213
##  239  1.439096093  1.576635461
##  240  0.844646302  1.323196664
##  241  0.042090387 -1.013369147
##  242  0.580334029 -1.648700531
##  243  0.216315671 -0.341534898
##  244  0.934034594 -0.235333352
##  245  0.212766560 -0.820277805
##  246 -0.001848989 -0.870938757
##  247  0.214712640 -0.342743597
##  248  2.061790312  1.540934016
##  249 -0.415775135  1.172969478
##  250 -0.410978837  1.388407784
##  251  1.385784103  1.587676199
##  252  0.219330347  0.678040022
##  253 -0.619149760 -1.386309944
##  254 -0.110453274 -1.703461302
##  255  0.122561297 -1.261467503
##  256 -0.550781026 -0.576221045
##  257  0.262910921  1.150909581
##  258  1.717824202  3.288451187
##  259  2.903345740  3.680655902
##  260  1.298438655  1.744836336
##  261  0.783181522 -1.299651977
##  262 -0.836106448 -1.656939155
##  263  0.824535377 -0.602264455
##  264  1.237470951  0.708937279
##  265  1.410941288  1.597715654
##  266  1.237144762  1.644888110
##  267 -0.559708998 -0.559653202
##  268 -0.116982554 -0.015890090
##  269  0.216144135 -0.026502721
##  270  0.020675529 -0.056426724
##  271  1.015736723  0.145024510
##  272  0.145157730  0.508949707
##  273  0.125344717  0.391443277
##  274 -1.253171399 -1.537704623
##  275 -0.417612814 -0.558552971
##  276  0.224588687  0.586708659
##  277 -2.262048646  0.103374257
##  278 -1.356666210  0.016330975
##  279  0.026518187  0.198010194
##  280 -0.091562850  0.347441849
##  281 -0.273075101  1.855588455
##  282 -1.412513556  1.158049241
##  283 -0.151391737  0.405954967
##  284  1.340597293  1.374203055
##  285  2.798555570  2.050633876
##  286  1.105315099  2.287543785
##  287  1.833898185  0.681426690
##  288  1.042110526  1.918176737
##  289  0.937229733  1.643395257
##  290  1.521435742  2.393220857
##  291 -0.720332499  0.300489494
##  292 -0.333878667 -0.564320909
##  293  1.454002745  1.091110092
##  294 -0.631201724  0.237048126
##  295 -0.841203882 -1.039195624
##  296 -1.961091688 -1.626641875
##  297 -0.650535400 -2.009775194
##  298 -0.358374583 -1.566348731
##  299  0.469694745 -0.357305213
##  300 -2.197716269 -1.955812475
##  301 -0.583699244 -1.381868558
##  302 -0.480005344  0.928104696
##  303  1.466786826  2.934342950
##  304  2.942756863  3.200265886
##  305  0.680195976  2.367442526
##  306  0.397628191 -0.638110259
##  307 -1.577821077 -1.656304985
##  308 -1.053373864 -1.149691306
##  309  0.530018392  0.182593283
##  310 -0.528677969  0.300868602
##  311 -2.313576692 -1.221223714
##  312  1.609540575  0.688744280
##  313  1.340473453  1.960232430
##  314  0.056958383  1.281195647
##  315 -1.133487567  1.721182441
##  316  1.795527146 -0.213365250
##  317  3.354082611 -0.072576421
##  318  0.100342831 -0.214275154
##  319  1.028810041  0.358006788
##  320  1.418786733  0.388452843
##  321 -0.342261639  0.719085588
##  322  0.582665595  1.867723648
##  323 -1.109438041  1.235365992
##  324 -0.040671492  1.391813480
##  325  0.491354447 -0.262110673
##  326 -0.987943319 -1.394454660
##  327  0.155828012  0.740079093
##  328  0.566950727  1.359020557
##  329 -2.591578316 -1.455822667
##  330 -0.575817897 -2.826895662
##  331 -2.308927109 -1.730868440
##  332 -0.085505980  0.246128364
##  333 -0.236140984  0.404844956
##  334  0.128755849  0.694699331
##  335  2.199720401  1.479508913
##  336  0.715145178  2.594410192
##  337  0.051836007  1.669867205
##  338 -1.281160684  0.476986622
##  339 -1.623764244 -1.636132326
##  340 -1.800250099 -1.268130783
##  341 -0.043366552 -0.902625496
##  342 -1.628365376 -1.530722260
##  343 -0.259021815 -1.126127701
##  344  0.147148386  0.587151747
##  345 -2.088127869 -1.309131378
##  346 -1.698804258 -1.816392945
##  347  0.564152333 -0.641920244
##  348  0.389343585 -1.027465001
##  349  1.795103103 -0.420940343
##  350  0.222469336  0.452099289
##  351 -1.341672520  0.308308588
##  352 -1.963378876 -2.389923697
##  353  0.719254475  0.621531940
##  354  2.533581034  1.266889397
##  355  0.574314359  0.928610472
##  356  1.579359962  0.877946273
##  357  1.480551486  1.424940362
##  358 -0.289352536  1.757478172
##  359  0.192027350  0.726280004
##  360  1.550839130  0.491155188
##  361  0.571606915 -0.608978389
##  362  0.564558681  0.201525079
##  363  0.491054590  0.027880690
##  364  0.605903895  2.194618391
##  365 -1.211523664  0.215723299
##  366  0.683028440 -1.224794701
##  367 -1.307245576  0.225947831
##  368 -0.443592506  0.990606828
##  369  0.610348634 -0.037232717
##  370 -1.913540088 -1.302691077
##  371 -0.924231408 -0.744721989
##  372 -1.265542586 -0.165486158
##  373 -0.302876838 -1.847080791
##  374 -0.261043878 -1.414713789
##  375  0.313430550 -0.216908287
##  376  0.544849306  0.204769069
##  377  0.104134185 -0.906223124
##  378  0.477735402 -0.323242180
##  379 -1.208829496  1.519664122
##  380  0.651893993  1.601420708
##  381 -0.101058216 -0.427044056
##  382  0.158899742 -1.131552922
##  383 -1.293078572 -0.211184992
##  384 -0.768274849 -0.537349319
##  385 -2.394829964 -2.642373946
##  386  0.563597947 -0.987284531
##  387  0.937303803 -0.683537561
##  388  0.190996553 -1.193360345
##  389 -0.792847198  0.859112370
##  390  0.569721660  0.235539086
##  391  1.415109587  0.529320801
##  392 -0.171569453 -0.679020868
##  393 -1.160404384 -1.188590103
##  394 -1.389820366 -0.607404252
##  395 -1.359128150 -1.387650709
##  396 -0.102836239 -1.635369190
##  397 -0.850074322 -0.836826442
##  398  0.430228570  0.405227260
##  399  0.698130605 -1.193630381
##  400 -0.188223372 -1.533116625
##  401  1.425469947  0.121594331
##  402 -1.763643623 -0.124127641
##  403 -0.320351755 -0.079350951
##  404  0.356102642  0.582069246
##  405  0.922874329  0.688570074
##  406 -0.672333517  0.993746209
##  407  1.057206876  0.502044042
##  408  0.145181260 -0.324417632
##  409 -1.209850236 -2.947312498
##  410 -0.640869830 -2.298709244
##  411 -0.269257733 -0.305798586
##  412  1.254946905  0.658801613
##  413  0.603260550 -0.089938447
##  414  0.587231726  1.474882200
##  415  1.849697287  1.618640535
##  416  0.670118799  0.755120229
##  417  1.449731788  1.561960777
##  418 -0.401049941  0.386255402
##  419  1.233584280 -0.693695114
##  420  0.978098373  1.964174634
##  421  1.747396678  1.799107817
##  422  0.989316154  2.178865360
##  423 -0.263661320  0.031937174
##  424  0.334343759 -0.900188972
##  425 -1.578062239  0.013108811
##  426  0.724957718  0.493183140
##  427  0.039735351 -0.707662045
##  428 -3.043258103 -0.695857469
##  429 -0.269896800 -1.276548256
##  430 -2.272903486 -0.208971478
##  431  1.349022031  1.378435309
##  432 -1.088448513 -1.269069559
##  433 -0.823697452 -0.257521254
##  434 -0.357073374 -0.700454142
##  435  1.185107434 -0.375889222
##  436 -0.248062824  0.774520506
##  437  0.739312115  0.362417643
##  438  0.022991079 -0.636333578
##  439 -1.353586644 -0.348136031
##  440 -1.532502816  0.417038402
##  441 -1.378673926  1.227823691
##  442 -0.069895022 -1.242338467
##  443 -1.552366712 -3.035249300
##  444  1.701390662 -0.298362083
##  445  1.409835805  1.672321393
##  446  1.579845786  1.460299790
##  447  2.019839995  1.370912819
##  448  0.342299885  1.686037967
##  449 -0.338164047 -1.696523950
##  450  0.504222527 -0.729141487
##  451  1.295055941 -0.148591494
##  452  0.734423938 -0.056454416
##  453  0.322754318 -0.196785710
##  454 -0.535548877  0.665350341
##  455  0.873117926  0.287115130
##  456  0.715466913  0.430402080
##  457  0.633094018 -0.002312472
##  458 -0.220766674 -1.288823440
##  459 -0.063353108  0.276969874
##  460  0.637632216  1.428996229
##  461  1.949069670  2.523411113
##  462  1.013785700  1.684308386
##  463  0.001327540  1.662872228
##  464  1.228231928  3.036782095
##  465 -0.510494704  1.617262041
##  466 -1.456288682 -0.978513558
##  467 -0.741801666 -1.194381191
##  468 -2.144148247 -0.692031381
##  469 -1.770017239 -0.162949530
##  470  1.972195385  1.739260371
##  471 -0.050725571  1.051786707
##  472 -1.588957369  0.525468722
##  473 -0.054633800  0.116458880
##  474  1.291842437 -0.058453660
##  475  0.815627757  0.306746920
##  476  1.230017000  1.577267604
##  477  1.813048916  1.258606007
##  478 -0.195959786  1.151083311
##  479  1.469992283  1.480606183
##  480  0.287106955  1.748385141
##  481  0.204517999  0.407507625
##  482  2.945433432  1.461936226
##  483  1.404966763  0.871064736
##  484  0.750536155 -0.034943117
##  485 -0.437990287  1.340675249
##  486  0.412919887  2.398311615
##  487  2.422388263  0.276543565
##  488 -1.760852698 -1.335103867
##  489 -0.883093485 -2.195145720
##  490  0.314703033 -1.155736053
##  491  0.973279797 -0.090956352
##  492  1.298736119  0.419248216
##  493  0.266865771  0.859989523
##  494 -0.854895263 -0.067817132
##  495 -0.964752310 -1.314990154
##  496 -0.834378651  0.135438714
##  497  1.279611466  1.305085445
##  498  0.749299902 -0.742110253
##  499  1.591031655 -1.072363795
##  500 -0.266500960 -1.265230687
##  501 -2.323928471 -2.898294188
##  502  0.147103033 -1.754743660
##  503  0.639471523 -0.530574742
##  504 -0.386322468 -0.296147545
##  505 -1.518543082  0.078623645
##  506  1.268374160  1.014128529
##  507  1.604678718  0.951068645
##  508 -0.409266079 -0.228316497
##  509 -0.019513243 -1.111512122
##  510 -0.692218503 -0.832656056
##  511  0.679474632 -0.005681227
##  512 -0.560478828 -0.886376227
##  513 -0.829706821 -0.970061913
##  514  0.403667624  0.584094252
##  515 -0.008114408  0.550581814
##  516 -0.884710249 -0.587386169
##  517 -0.716622608 -0.801371353
##  518  0.359980125  0.736264555
##  519  0.871618941  1.328247600
##  520  2.487509652  1.910172061
##  521 -0.692754143  1.330487375
##  522  0.239866068  0.878970238
##  523  0.586708981 -0.089628293
##  524  1.911647766  0.299253725
##  525  0.369078317 -0.113872090
##  526 -0.867700368 -1.707893903
##  527 -0.854885888 -1.094657958
##  528  1.255033321  1.681450313
##  529  2.128195441  2.278275042
##  530  0.940738226  2.249193072
##  531  0.971881577  1.616240340
##  532  0.244807737  0.055742785
##  533  0.484379330 -0.489796609
##  534  0.850726649 -0.521307517
##  535 -0.101697227 -0.761716088
##  536  0.044480612  0.241302568
##  537  1.008218587 -0.772889090
##  538  0.182442945  0.035817654
##  539  2.231892403  1.308080848
##  540 -0.248983588 -0.374121861
##  541  0.577895094 -0.072055740
##  542 -0.181910630  2.728355929
##  543  0.625810350  1.476404623
##  544  0.482814404  1.009217887
##  545 -0.786837597 -0.056984359
##  546 -0.684635291  0.702515188
##  547  1.456126795  1.015934985
##  548  1.954962858  2.081608247
##  549 -1.302997274 -0.008530559
##  550  0.032707586 -0.783342418
##  551 -1.506333742 -0.787576845
##  552 -1.399573481 -0.697000511
##  553  0.056756783 -0.937311330
##  554 -1.400937176 -1.429826351
##  555  0.859906322 -0.267147321
##  556 -0.400658262 -0.878363723
##  557  0.874514705  0.676731458
##  558 -0.644212539 -0.241171682
##  559 -1.433409158 -0.564375646
##  560  1.121860325  0.414216169
##  561  0.726818908  0.977494833
##  562 -0.096633032  0.284869456
##  563  0.076280077  0.014089500
##  564  1.828529342  1.005241999
##  565 -1.035297255 -0.674261241
##  566 -1.605533966 -1.712251042
##  567 -0.911686480 -0.584142854
##  568 -1.814903107 -0.459823677
##  569  1.324461088  1.009665902
##  570  1.022947462  1.661155631
##  571  0.660742161  0.907140373
##  572 -0.643113269 -1.199531829
##  573 -1.053979433 -1.087637982
##  574 -1.138247189 -0.629657150
##  575  0.627130607 -0.449451593
##  576 -2.109968654 -1.367567962
##  577  0.189102963 -0.502391958
##  578 -1.262784154 -0.940345006
##  579 -0.231591637 -1.027803703
##  580 -0.760703658 -0.040026272
##  581 -0.825747061 -0.604810756
##  582  1.774261059  0.009790284
##  583  0.157243812 -1.022077613
##  584 -4.032223606 -3.774653164
##  585 -0.909745233 -2.072315298
##  586 -0.226148320  0.451329233
##  587 -1.001714558  0.269823260
##  588  0.430861151  0.442150521
##  589 -0.255638605 -0.771208242
##  590 -0.796741243 -0.936469342
##  591  0.829686826 -2.286033482
##  592 -2.486384237 -0.475388341
##  593  1.992161790  2.307884805
##  594  1.059143296  2.696333133
##  595  1.315792962  1.318559103
##  596 -0.279715748  0.348563906
##  597 -1.307946374 -1.428163623
##  598 -1.908428444 -0.396097554
##  599 -0.176633816  0.065629225
##  600  2.107535177 -0.742421248
##  601  0.008140393 -1.963123630
##  602  0.878215915 -1.594712482
##  603  0.176287254 -1.477356128
##  604  0.511878745 -1.264767926
##  605  0.005103602 -1.795545626
##  606  0.745455332  0.540125801
##  607 -0.087613797  0.989829955
##  608  0.149011663  1.363892800
##  609 -2.428369642 -1.655059292
##  610 -1.131100440 -2.250565453
##  611  0.110730255 -1.577250842
##  612  0.015001268 -2.033842578
##  613  0.257629350  0.324993291
##  614 -0.819867295 -0.544479355
##  615  3.014220190 -0.552594506
##  616  1.156612063  0.839853064
##  617  1.847257430  0.853364250
##  618 -0.602756195 -0.530151108
##  619  0.134288741  0.344492736
##  620  0.820866501  0.744518806
##  621  1.299098200 -0.754848224
##  622 -1.384600779 -2.146252468
##  623  1.228024252  0.748817170
##  624 -1.800064273  0.589500723
##  625 -1.516240939 -2.017973010
##  626 -1.791968260 -0.999918367
##  627  1.251804931  0.276884427
##  628 -0.722280028 -1.115653880
##  629 -1.867658955 -2.954569745
##  630  0.382024022 -1.974151648
##  631  1.360772628  0.488999539
##  632 -0.221760182  1.352522043
##  633  0.543307091  0.230881206
##  634 -1.734140859 -1.011392582
##  635 -0.700337591 -0.449445134
##  636  1.695604230  0.158053186
##  637  1.828030139  0.755804376
##  638  1.181918373  0.145799236
##  639 -0.198306462  0.745194849
##  640 -1.960219493 -0.157576046
##  641 -1.572309823 -0.793223278
##  642  1.121344120  0.337575190
##  643  0.440257828  1.461651428
##  644 -2.665119880 -1.005023469
##  645 -0.761971980 -1.163568984
##  646  1.566890981  0.313303520
##  647  0.117246765 -1.052443752
##  648 -1.101518385 -0.560519682
##  649 -1.923925340 -0.756017375
##  650 -0.636866893  0.379360664
##  651  0.615736040  1.162416738
##  652  1.581582867  1.387018332
##  653 -1.479264667  0.921350976
##  654  1.623408451  1.200413392
##  655  1.091689108  2.172462763
##  656  2.223901024  3.308244108
##  657 -0.679654470  1.947202186
##  658 -1.506198361 -1.679087962
##  659 -1.246597154 -1.596725929
##  660  0.915044564 -0.257693568
##  661  0.963237641 -0.129872813
##  662  0.660917511  0.451654103
##  663  2.319371435  1.430318506
##  664 -0.307185148  0.416452104
##  665  0.798461738 -0.428150911
##  666  0.025234606  0.122349272
##  667 -0.824641024 -0.314597856
##  668  0.784268116 -0.278223844
##  669  0.381329801 -1.999541060
##  670 -0.472057503 -2.700615839
##  671 -1.858348499 -2.697890088
##  672 -1.633221865 -2.326868461
##  673  0.468587390 -1.818176915
##  674  0.097926309 -0.509800196
##  675  1.339736737  1.020325515
##  676 -0.303816670  0.069770627
##  677  0.591235157 -1.339599559
##  678 -1.779749254 -1.941988218
##  679 -0.133663290 -1.518029621
##  680 -1.268041124 -0.901732318
##  681 -2.415783364  0.093583304
##  682 -1.368678053 -0.051441084
##  683 -0.990996808 -2.254584015
##  684 -0.020604308 -1.807054115
##  685 -1.451625364  0.599353439
##  686 -0.268924116  1.965000705
##  687  1.962714810  0.396337628
##  688 -1.345577782 -1.823356864
##  689  1.074282712  1.137165161
##  690  0.176943604  1.407757852
##  691 -0.176750318  0.243665134
##  692  0.309718259  0.444948104
##  693 -0.624172123 -1.270267931
##  694 -1.150719820 -1.916319219
##  695 -1.709520348 -2.479447727
##  696 -4.151435957 -2.207150135
##  697  1.423734043 -0.889842914
##  698  1.004305400 -1.572237616
##  699 -1.383103409 -0.564043334
##  700  0.039453662  0.415122368
##  701  1.057772154 -0.635006301
##  702  0.790147793 -0.416284461
##  703  1.644780766  0.736358295
##  704 -0.243725257  1.656043323
##  705  2.984524269  0.814512345
##  706 -1.111313575  0.044292770
##  707  0.693793991 -0.120244701
##  708  0.822291620  1.362031278
##  709  0.723495759  2.254412154
##  710  0.657214782  2.073261160
##  711 -0.615477647  0.751838332
##  712  1.850221063  0.455122534
##  713  0.452737132  0.726447808
##  714 -0.051828944 -0.622093786
##  715 -1.008251816 -2.435769298
##  716 -0.851697263 -0.953053020
##  717 -1.881176956 -1.494311423
##  718 -0.351906192 -1.211265004
##  719 -2.149784368 -0.112289836
##  720 -1.090914768  0.655304350
##  721 -0.742421076  0.667951238
##  722 -1.297556521 -0.437755316
##  723  0.351494998  0.488612362
##  724  2.787687751  2.378400405
##  725 -0.283316237  2.464015814
##  726  0.051747644 -0.763856753
##  727  0.998841608  0.198593709
##  728 -0.637877073  0.703310259
##  729  0.301140290  0.707879384
##  730  1.372037998  1.096854191
##  731  0.016184298  0.543386802
##  732 -0.200979444  0.039409806
##  733  0.804400997  0.993348412
##  734  0.699579237  1.519184981
##  735  0.345256461  1.801818702
##  736  1.570686695  3.418603429
##  737  3.323569912  2.881460240
##  738  1.575682260  1.404027161
##  739 -1.757464265 -1.685734384
##  740 -0.704579056  1.080677133
##  741  0.233709419  1.187383320
##  742  2.573580351  2.489611300
##  743  1.447126276  2.308894316
##  744  0.507704902  2.418420278
##  745  1.574749999  1.385030862
##  746  0.302692038  0.872124853
##  747 -0.755013093  0.731330813
##  748  0.531321221  0.140257534
##  749  1.438454353 -0.171376914
##  750  0.885080473  0.901224349
##  751  0.479663534  0.575326326
##  752 -1.639149964 -1.965813670
##  753 -0.333838768 -1.804474597
##  754 -1.120318734 -0.099496398
##  755 -1.224897975  0.856502100
##  756  0.547520384  1.181746306
##  757 -0.549240366 -1.029293720
##  758  1.972007123 -0.786096819
##  759 -0.758146711  0.916401193
##  760  1.188620646  2.035428644
##  761  1.317031425  1.023956663
##  762  0.986999733 -0.127186223
##  763  0.633643351  1.288735672
##  764 -1.011950356 -0.537388428
##  765 -0.781789316 -1.432010528
##  766  1.844477958 -0.190556068
##  767 -0.240365765 -1.446209546
##  768 -2.526038015 -0.963121884
##  769  2.287829822  1.728741387
##  770  1.267249548  1.453493773
##  771  0.044210118  0.155563780
##  772  0.173313297  0.382353836
##  773 -0.113244801  0.073089837
##  774  0.604455101  0.695791240
##  775  0.256069579  1.519873023
##  776  0.732446902  0.910871300
##  777 -1.382398493 -0.902084937
##  778 -0.888449268 -2.177192287
##  779  0.154204713 -1.905265416
##  780  0.473857210 -0.070697807
##  781  0.243387543 -1.580724266
##  782 -2.760691275 -3.339645026
##  783 -1.244625171 -2.598835912
##  784  0.261177384 -0.712145838
##  785 -1.533011056 -0.930012376
##  786  1.641295487  0.150962300
##  787 -0.623791422  0.822033179
##  788  0.285846369  0.242655320
##  789  0.554984792  0.806304924
##  790  0.641505656  1.039670708
##  791 -0.180350200  0.060148767
##  792  0.463032813  0.026192051
##  793 -0.645700272  0.770928440
##  794 -0.833704910  0.911318556
##  795 -0.757805122 -0.206472969
##  796  0.174803501  0.464255210
##  797  2.116654766  1.719813891
##  798  2.271797558  1.368686837
##  799  0.665905458  0.692847992
##  800  0.483732447  0.204281648
##  801  0.848799017  2.184887800
##  802  1.054297982  2.012489795
##  803 -1.112740523  0.583610676
##  804 -0.916057078 -2.411981614
##  805 -2.306971157 -3.542835150
##  806 -0.626903541 -1.923164628
##  807 -0.550727311 -0.409491944
##  808 -0.533029786  0.257171898
##  809  0.299435913  1.037094579
##  810 -0.103040233  0.527729355
##  811  1.732493906  1.275831396
##  812  0.243471969  0.068527773
##  813 -0.391829779 -1.648642410
##  814 -2.404753716 -2.327800261
##  815  1.211553638 -0.570536143
##  816  0.217904305  0.117067727
##  817 -0.464542269  0.783478269
##  818  0.490169655  0.362246020
##  819  0.561898276 -0.617071507
##  820 -1.808387177 -0.849420078
##  821  0.544297402 -2.291619135
##  822 -1.549735412 -2.783409413
##  823 -0.309761770 -2.861865101
##  824 -0.190365972 -0.525254581
##  825 -0.446295509 -0.227745330
##  826 -1.623684443  0.422471208
##  827 -0.081191273  2.037961891
##  828  0.547589230  1.177859059
##  829  1.098527155  0.541349219
##  830 -2.605040304 -1.446723300
##  831  0.311330849 -2.128220527
##  832  0.903197366 -0.991586198
##  833 -1.128457022  0.029718469
##  834  0.171831000 -0.600939125
##  835  0.028799888  2.124878203
##  836  0.635551432  1.521502821
##  837  1.074412406  0.291499334
##  838  1.253021370  0.769363446
##  839 -0.584331437  0.529686332
##  840 -0.635471857 -0.497670805
##  841 -0.689053206  0.574220729
##  842  1.494775847  2.310464374
##  843 -0.823466163  1.471218003
##  844 -2.134932561  0.988785761
##  845  1.709990733  0.480356902
##  846  2.829400933  1.111856039
##  847 -0.612225027 -0.314382974
##  848  1.585333304  1.648461635
##  849  0.518215894  1.051437355
##  850  0.751721884 -1.445183832
##  851 -0.202804909 -1.513897684
##  852 -0.037795902 -0.482919735
##  853 -1.023086687  1.552099529
##  854  2.177280751  2.188650139
##  855  0.276475541  1.254658312
##  856 -1.874418492 -0.941856814
##  857 -1.123464940 -1.843336551
##  858 -0.701430545 -1.149304770
##  859  2.122502981  2.126592216
##  860 -1.140264459  0.054263147
##  861 -0.449033723  0.217219809
##  862  1.539849434  0.103459011
##  863  2.075371506  1.433411475
##  864  1.225123670  0.123818252
##  865  1.467108141 -0.388831610
##  866 -0.368163424 -1.144388807
##  867 -0.576671530  0.010424313
##  868  1.524536560  1.938664996
##  869  2.695828251  3.274210250
##  870  3.791245389  2.755224236
##  871 -0.430665406  3.068633854
##  872  1.817559299  3.088647192
##  873  1.363760183  1.417931200
##  874  0.363640916  0.836479142
##  875 -1.799088173 -0.482531850
##  876  0.333521477 -0.815958830
##  877 -0.337298254  0.883574975
##  878  1.214280744  1.416838490
##  879  1.484077181  1.153050950
##  880  1.052188466 -0.463537089
##  881 -2.189183736 -1.262639877
##  882  0.358914552 -1.445654592
##  883 -0.967333114 -0.420703514
##  884 -1.748554849 -0.919070750
##  885  1.209853841 -0.208933650
##  886  0.697222067 -0.898075812
##  887  0.257866487  1.000899509
##  888  1.597103922  1.675126431
##  889 -0.844410746  0.031829992
##  890 -0.200985017 -0.099906876
##  891 -0.224674382 -0.261902296
##  892 -0.222564719  0.116350671
##  893  0.966104687  0.464011900
##  894  1.160755414 -0.753144243
##  895 -1.217928182 -1.524314238
##  896 -0.309337215 -0.553357526
##  897  2.448178096  1.622841493
##  898  0.866455735  2.390995411
##  899 -2.286518344  0.635039654
##  900  0.866059317  0.704151061
##  901 -0.598648803  0.575638416
##  902 -0.773677906  0.449721000
##  903  1.693784122  0.545934617
##  904  3.882703454  2.869410894
##  905 -0.558152872  0.963259340
##  906  0.929651809 -0.202746744
##  907 -0.989318529 -1.790341382
##  908 -0.276820109 -0.837255136
##  909  1.792411648  1.140349893
##  910  1.381710241  2.336071445
##  911 -1.102111703 -0.501492698
##  912 -0.820534344 -0.700250938
##  913  1.480974965  1.589679419
##  914 -1.906160863  0.859572938
##  915  1.014601091 -0.161286582
##  916 -1.662649330 -0.190998463
##  917  0.166656364  0.289450601
##  918  0.276893238  0.934504432
##  919  2.258445562  1.930752151
##  920  0.760173563  1.142648497
##  921  0.347603535  0.491328799
##  922  2.064903579  2.733535540
##  923  0.420564708  2.495158529
##  924  0.380526210  1.152850132
##  925  0.726578648 -0.902011531
##  926  0.214039134 -0.938868974
##  927 -1.526276118 -0.501558822
##  928  0.501868091 -0.272176553
##  929 -1.708886386 -0.662593522
##  930 -1.184962069 -1.173302530
##  931  0.502834275 -1.416172217
##  932 -2.750916674 -0.999742996
##  933 -1.298535445  0.960957491
##  934  2.312092772  2.021440198
##  935 -0.429292657  0.771000255
##  936  0.426405050 -1.634603937
##  937 -1.257211619 -2.177922837
##  938 -0.338938871 -1.533429099
##  939  0.520643394 -0.585270992
##  940 -1.044396655 -0.786369571
##  941  0.415142168  1.439466182
##  942  0.166359163  1.162912665
##  943  2.315482057 -1.001204438
##  944 -0.398150593 -1.048595324
##  945 -0.222493106 -1.390587057
##  946 -0.722608141 -0.763709201
##  947 -0.200491289  0.082598708
##  948  1.627346684  0.497184031
##  949 -0.986338292 -1.294909244
##  950 -0.469209003 -0.978690612
##  951  0.440561435  0.127198542
##  952 -1.045585667 -1.227723844
##  953  1.897311287 -0.123505737
##  954 -0.816058623  1.224801978
##  955  3.540865677  3.059145394
##  956  0.760536254  2.224256286
##  957  1.753300600  0.792361907
##  958 -1.820346826  0.357661170
##  959  1.068759371  0.225357499
##  960  0.003440060 -1.745982410
##  961 -2.830796056 -3.119158169
##  962 -1.692748852 -1.848849947
##  963 -0.393721079 -1.174491848
##  964  0.849763069 -0.588144720
##  965 -1.896141067 -2.260283527
##  966 -1.840319749 -3.232387499
##  967  0.161072527 -2.820548816
##  968 -1.332771312 -0.410848143
##  969  0.583436311 -0.728715340
##  970 -0.334918590 -1.567373559
##  971 -1.500862141 -0.790095226
##  972 -0.927786852 -0.519838020
##  973  0.697823806 -0.170907408
##  974  1.412458607  2.326998349
##  975  1.788111690  0.726026824
##  976 -0.926765676 -0.649963428
##  977 -2.146729345 -0.864483298
##  978  1.545162283  0.994670713
##  979 -0.466064616  0.285114004
##  980 -0.070307055 -0.381295164
##  981  2.034892620  0.631701613
##  982 -0.488170675 -0.475513245
##  983  2.041168615  0.983226574
##  984 -0.197980502  1.798318296
##  985  0.827096280 -0.196829913
##  986  0.176011977 -0.141574470
##  987 -0.751016829 -0.028490580
##  988 -1.180994926  0.198028026
##  989  0.139667462  0.126047597
##  990  0.786836121  1.063342717
##  991  0.029027041 -0.496839552
##  992 -0.136753356 -1.347218756
##  993 -0.917817893 -0.914664653
##  994 -1.209000452 -1.394793460
##  995 -0.741208343 -1.956292444
##  996 -1.104011919 -1.124845496
##  997  0.979918196 -0.478618902
##  998 -1.205372131 -2.759016012
##  999 -1.146169684 -1.061802735
## 1000 -1.581157142  0.451471643

Une autre méthode serait

Matrice = matrix(rep(0, 1), 1000, 2)
Matrice
##         [,1] [,2]
##    [1,]    0    0
##    [2,]    0    0
##    [3,]    0    0
##    [4,]    0    0
##    [5,]    0    0
##    [6,]    0    0
##    [7,]    0    0
##    [8,]    0    0
##    [9,]    0    0
##   [10,]    0    0
##   [11,]    0    0
##   [12,]    0    0
##   [13,]    0    0
##   [14,]    0    0
##   [15,]    0    0
##   [16,]    0    0
##   [17,]    0    0
##   [18,]    0    0
##   [19,]    0    0
##   [20,]    0    0
##   [21,]    0    0
##   [22,]    0    0
##   [23,]    0    0
##   [24,]    0    0
##   [25,]    0    0
##   [26,]    0    0
##   [27,]    0    0
##   [28,]    0    0
##   [29,]    0    0
##   [30,]    0    0
##   [31,]    0    0
##   [32,]    0    0
##   [33,]    0    0
##   [34,]    0    0
##   [35,]    0    0
##   [36,]    0    0
##   [37,]    0    0
##   [38,]    0    0
##   [39,]    0    0
##   [40,]    0    0
##   [41,]    0    0
##   [42,]    0    0
##   [43,]    0    0
##   [44,]    0    0
##   [45,]    0    0
##   [46,]    0    0
##   [47,]    0    0
##   [48,]    0    0
##   [49,]    0    0
##   [50,]    0    0
##   [51,]    0    0
##   [52,]    0    0
##   [53,]    0    0
##   [54,]    0    0
##   [55,]    0    0
##   [56,]    0    0
##   [57,]    0    0
##   [58,]    0    0
##   [59,]    0    0
##   [60,]    0    0
##   [61,]    0    0
##   [62,]    0    0
##   [63,]    0    0
##   [64,]    0    0
##   [65,]    0    0
##   [66,]    0    0
##   [67,]    0    0
##   [68,]    0    0
##   [69,]    0    0
##   [70,]    0    0
##   [71,]    0    0
##   [72,]    0    0
##   [73,]    0    0
##   [74,]    0    0
##   [75,]    0    0
##   [76,]    0    0
##   [77,]    0    0
##   [78,]    0    0
##   [79,]    0    0
##   [80,]    0    0
##   [81,]    0    0
##   [82,]    0    0
##   [83,]    0    0
##   [84,]    0    0
##   [85,]    0    0
##   [86,]    0    0
##   [87,]    0    0
##   [88,]    0    0
##   [89,]    0    0
##   [90,]    0    0
##   [91,]    0    0
##   [92,]    0    0
##   [93,]    0    0
##   [94,]    0    0
##   [95,]    0    0
##   [96,]    0    0
##   [97,]    0    0
##   [98,]    0    0
##   [99,]    0    0
##  [100,]    0    0
##  [101,]    0    0
##  [102,]    0    0
##  [103,]    0    0
##  [104,]    0    0
##  [105,]    0    0
##  [106,]    0    0
##  [107,]    0    0
##  [108,]    0    0
##  [109,]    0    0
##  [110,]    0    0
##  [111,]    0    0
##  [112,]    0    0
##  [113,]    0    0
##  [114,]    0    0
##  [115,]    0    0
##  [116,]    0    0
##  [117,]    0    0
##  [118,]    0    0
##  [119,]    0    0
##  [120,]    0    0
##  [121,]    0    0
##  [122,]    0    0
##  [123,]    0    0
##  [124,]    0    0
##  [125,]    0    0
##  [126,]    0    0
##  [127,]    0    0
##  [128,]    0    0
##  [129,]    0    0
##  [130,]    0    0
##  [131,]    0    0
##  [132,]    0    0
##  [133,]    0    0
##  [134,]    0    0
##  [135,]    0    0
##  [136,]    0    0
##  [137,]    0    0
##  [138,]    0    0
##  [139,]    0    0
##  [140,]    0    0
##  [141,]    0    0
##  [142,]    0    0
##  [143,]    0    0
##  [144,]    0    0
##  [145,]    0    0
##  [146,]    0    0
##  [147,]    0    0
##  [148,]    0    0
##  [149,]    0    0
##  [150,]    0    0
##  [151,]    0    0
##  [152,]    0    0
##  [153,]    0    0
##  [154,]    0    0
##  [155,]    0    0
##  [156,]    0    0
##  [157,]    0    0
##  [158,]    0    0
##  [159,]    0    0
##  [160,]    0    0
##  [161,]    0    0
##  [162,]    0    0
##  [163,]    0    0
##  [164,]    0    0
##  [165,]    0    0
##  [166,]    0    0
##  [167,]    0    0
##  [168,]    0    0
##  [169,]    0    0
##  [170,]    0    0
##  [171,]    0    0
##  [172,]    0    0
##  [173,]    0    0
##  [174,]    0    0
##  [175,]    0    0
##  [176,]    0    0
##  [177,]    0    0
##  [178,]    0    0
##  [179,]    0    0
##  [180,]    0    0
##  [181,]    0    0
##  [182,]    0    0
##  [183,]    0    0
##  [184,]    0    0
##  [185,]    0    0
##  [186,]    0    0
##  [187,]    0    0
##  [188,]    0    0
##  [189,]    0    0
##  [190,]    0    0
##  [191,]    0    0
##  [192,]    0    0
##  [193,]    0    0
##  [194,]    0    0
##  [195,]    0    0
##  [196,]    0    0
##  [197,]    0    0
##  [198,]    0    0
##  [199,]    0    0
##  [200,]    0    0
##  [201,]    0    0
##  [202,]    0    0
##  [203,]    0    0
##  [204,]    0    0
##  [205,]    0    0
##  [206,]    0    0
##  [207,]    0    0
##  [208,]    0    0
##  [209,]    0    0
##  [210,]    0    0
##  [211,]    0    0
##  [212,]    0    0
##  [213,]    0    0
##  [214,]    0    0
##  [215,]    0    0
##  [216,]    0    0
##  [217,]    0    0
##  [218,]    0    0
##  [219,]    0    0
##  [220,]    0    0
##  [221,]    0    0
##  [222,]    0    0
##  [223,]    0    0
##  [224,]    0    0
##  [225,]    0    0
##  [226,]    0    0
##  [227,]    0    0
##  [228,]    0    0
##  [229,]    0    0
##  [230,]    0    0
##  [231,]    0    0
##  [232,]    0    0
##  [233,]    0    0
##  [234,]    0    0
##  [235,]    0    0
##  [236,]    0    0
##  [237,]    0    0
##  [238,]    0    0
##  [239,]    0    0
##  [240,]    0    0
##  [241,]    0    0
##  [242,]    0    0
##  [243,]    0    0
##  [244,]    0    0
##  [245,]    0    0
##  [246,]    0    0
##  [247,]    0    0
##  [248,]    0    0
##  [249,]    0    0
##  [250,]    0    0
##  [251,]    0    0
##  [252,]    0    0
##  [253,]    0    0
##  [254,]    0    0
##  [255,]    0    0
##  [256,]    0    0
##  [257,]    0    0
##  [258,]    0    0
##  [259,]    0    0
##  [260,]    0    0
##  [261,]    0    0
##  [262,]    0    0
##  [263,]    0    0
##  [264,]    0    0
##  [265,]    0    0
##  [266,]    0    0
##  [267,]    0    0
##  [268,]    0    0
##  [269,]    0    0
##  [270,]    0    0
##  [271,]    0    0
##  [272,]    0    0
##  [273,]    0    0
##  [274,]    0    0
##  [275,]    0    0
##  [276,]    0    0
##  [277,]    0    0
##  [278,]    0    0
##  [279,]    0    0
##  [280,]    0    0
##  [281,]    0    0
##  [282,]    0    0
##  [283,]    0    0
##  [284,]    0    0
##  [285,]    0    0
##  [286,]    0    0
##  [287,]    0    0
##  [288,]    0    0
##  [289,]    0    0
##  [290,]    0    0
##  [291,]    0    0
##  [292,]    0    0
##  [293,]    0    0
##  [294,]    0    0
##  [295,]    0    0
##  [296,]    0    0
##  [297,]    0    0
##  [298,]    0    0
##  [299,]    0    0
##  [300,]    0    0
##  [301,]    0    0
##  [302,]    0    0
##  [303,]    0    0
##  [304,]    0    0
##  [305,]    0    0
##  [306,]    0    0
##  [307,]    0    0
##  [308,]    0    0
##  [309,]    0    0
##  [310,]    0    0
##  [311,]    0    0
##  [312,]    0    0
##  [313,]    0    0
##  [314,]    0    0
##  [315,]    0    0
##  [316,]    0    0
##  [317,]    0    0
##  [318,]    0    0
##  [319,]    0    0
##  [320,]    0    0
##  [321,]    0    0
##  [322,]    0    0
##  [323,]    0    0
##  [324,]    0    0
##  [325,]    0    0
##  [326,]    0    0
##  [327,]    0    0
##  [328,]    0    0
##  [329,]    0    0
##  [330,]    0    0
##  [331,]    0    0
##  [332,]    0    0
##  [333,]    0    0
##  [334,]    0    0
##  [335,]    0    0
##  [336,]    0    0
##  [337,]    0    0
##  [338,]    0    0
##  [339,]    0    0
##  [340,]    0    0
##  [341,]    0    0
##  [342,]    0    0
##  [343,]    0    0
##  [344,]    0    0
##  [345,]    0    0
##  [346,]    0    0
##  [347,]    0    0
##  [348,]    0    0
##  [349,]    0    0
##  [350,]    0    0
##  [351,]    0    0
##  [352,]    0    0
##  [353,]    0    0
##  [354,]    0    0
##  [355,]    0    0
##  [356,]    0    0
##  [357,]    0    0
##  [358,]    0    0
##  [359,]    0    0
##  [360,]    0    0
##  [361,]    0    0
##  [362,]    0    0
##  [363,]    0    0
##  [364,]    0    0
##  [365,]    0    0
##  [366,]    0    0
##  [367,]    0    0
##  [368,]    0    0
##  [369,]    0    0
##  [370,]    0    0
##  [371,]    0    0
##  [372,]    0    0
##  [373,]    0    0
##  [374,]    0    0
##  [375,]    0    0
##  [376,]    0    0
##  [377,]    0    0
##  [378,]    0    0
##  [379,]    0    0
##  [380,]    0    0
##  [381,]    0    0
##  [382,]    0    0
##  [383,]    0    0
##  [384,]    0    0
##  [385,]    0    0
##  [386,]    0    0
##  [387,]    0    0
##  [388,]    0    0
##  [389,]    0    0
##  [390,]    0    0
##  [391,]    0    0
##  [392,]    0    0
##  [393,]    0    0
##  [394,]    0    0
##  [395,]    0    0
##  [396,]    0    0
##  [397,]    0    0
##  [398,]    0    0
##  [399,]    0    0
##  [400,]    0    0
##  [401,]    0    0
##  [402,]    0    0
##  [403,]    0    0
##  [404,]    0    0
##  [405,]    0    0
##  [406,]    0    0
##  [407,]    0    0
##  [408,]    0    0
##  [409,]    0    0
##  [410,]    0    0
##  [411,]    0    0
##  [412,]    0    0
##  [413,]    0    0
##  [414,]    0    0
##  [415,]    0    0
##  [416,]    0    0
##  [417,]    0    0
##  [418,]    0    0
##  [419,]    0    0
##  [420,]    0    0
##  [421,]    0    0
##  [422,]    0    0
##  [423,]    0    0
##  [424,]    0    0
##  [425,]    0    0
##  [426,]    0    0
##  [427,]    0    0
##  [428,]    0    0
##  [429,]    0    0
##  [430,]    0    0
##  [431,]    0    0
##  [432,]    0    0
##  [433,]    0    0
##  [434,]    0    0
##  [435,]    0    0
##  [436,]    0    0
##  [437,]    0    0
##  [438,]    0    0
##  [439,]    0    0
##  [440,]    0    0
##  [441,]    0    0
##  [442,]    0    0
##  [443,]    0    0
##  [444,]    0    0
##  [445,]    0    0
##  [446,]    0    0
##  [447,]    0    0
##  [448,]    0    0
##  [449,]    0    0
##  [450,]    0    0
##  [451,]    0    0
##  [452,]    0    0
##  [453,]    0    0
##  [454,]    0    0
##  [455,]    0    0
##  [456,]    0    0
##  [457,]    0    0
##  [458,]    0    0
##  [459,]    0    0
##  [460,]    0    0
##  [461,]    0    0
##  [462,]    0    0
##  [463,]    0    0
##  [464,]    0    0
##  [465,]    0    0
##  [466,]    0    0
##  [467,]    0    0
##  [468,]    0    0
##  [469,]    0    0
##  [470,]    0    0
##  [471,]    0    0
##  [472,]    0    0
##  [473,]    0    0
##  [474,]    0    0
##  [475,]    0    0
##  [476,]    0    0
##  [477,]    0    0
##  [478,]    0    0
##  [479,]    0    0
##  [480,]    0    0
##  [481,]    0    0
##  [482,]    0    0
##  [483,]    0    0
##  [484,]    0    0
##  [485,]    0    0
##  [486,]    0    0
##  [487,]    0    0
##  [488,]    0    0
##  [489,]    0    0
##  [490,]    0    0
##  [491,]    0    0
##  [492,]    0    0
##  [493,]    0    0
##  [494,]    0    0
##  [495,]    0    0
##  [496,]    0    0
##  [497,]    0    0
##  [498,]    0    0
##  [499,]    0    0
##  [500,]    0    0
##  [501,]    0    0
##  [502,]    0    0
##  [503,]    0    0
##  [504,]    0    0
##  [505,]    0    0
##  [506,]    0    0
##  [507,]    0    0
##  [508,]    0    0
##  [509,]    0    0
##  [510,]    0    0
##  [511,]    0    0
##  [512,]    0    0
##  [513,]    0    0
##  [514,]    0    0
##  [515,]    0    0
##  [516,]    0    0
##  [517,]    0    0
##  [518,]    0    0
##  [519,]    0    0
##  [520,]    0    0
##  [521,]    0    0
##  [522,]    0    0
##  [523,]    0    0
##  [524,]    0    0
##  [525,]    0    0
##  [526,]    0    0
##  [527,]    0    0
##  [528,]    0    0
##  [529,]    0    0
##  [530,]    0    0
##  [531,]    0    0
##  [532,]    0    0
##  [533,]    0    0
##  [534,]    0    0
##  [535,]    0    0
##  [536,]    0    0
##  [537,]    0    0
##  [538,]    0    0
##  [539,]    0    0
##  [540,]    0    0
##  [541,]    0    0
##  [542,]    0    0
##  [543,]    0    0
##  [544,]    0    0
##  [545,]    0    0
##  [546,]    0    0
##  [547,]    0    0
##  [548,]    0    0
##  [549,]    0    0
##  [550,]    0    0
##  [551,]    0    0
##  [552,]    0    0
##  [553,]    0    0
##  [554,]    0    0
##  [555,]    0    0
##  [556,]    0    0
##  [557,]    0    0
##  [558,]    0    0
##  [559,]    0    0
##  [560,]    0    0
##  [561,]    0    0
##  [562,]    0    0
##  [563,]    0    0
##  [564,]    0    0
##  [565,]    0    0
##  [566,]    0    0
##  [567,]    0    0
##  [568,]    0    0
##  [569,]    0    0
##  [570,]    0    0
##  [571,]    0    0
##  [572,]    0    0
##  [573,]    0    0
##  [574,]    0    0
##  [575,]    0    0
##  [576,]    0    0
##  [577,]    0    0
##  [578,]    0    0
##  [579,]    0    0
##  [580,]    0    0
##  [581,]    0    0
##  [582,]    0    0
##  [583,]    0    0
##  [584,]    0    0
##  [585,]    0    0
##  [586,]    0    0
##  [587,]    0    0
##  [588,]    0    0
##  [589,]    0    0
##  [590,]    0    0
##  [591,]    0    0
##  [592,]    0    0
##  [593,]    0    0
##  [594,]    0    0
##  [595,]    0    0
##  [596,]    0    0
##  [597,]    0    0
##  [598,]    0    0
##  [599,]    0    0
##  [600,]    0    0
##  [601,]    0    0
##  [602,]    0    0
##  [603,]    0    0
##  [604,]    0    0
##  [605,]    0    0
##  [606,]    0    0
##  [607,]    0    0
##  [608,]    0    0
##  [609,]    0    0
##  [610,]    0    0
##  [611,]    0    0
##  [612,]    0    0
##  [613,]    0    0
##  [614,]    0    0
##  [615,]    0    0
##  [616,]    0    0
##  [617,]    0    0
##  [618,]    0    0
##  [619,]    0    0
##  [620,]    0    0
##  [621,]    0    0
##  [622,]    0    0
##  [623,]    0    0
##  [624,]    0    0
##  [625,]    0    0
##  [626,]    0    0
##  [627,]    0    0
##  [628,]    0    0
##  [629,]    0    0
##  [630,]    0    0
##  [631,]    0    0
##  [632,]    0    0
##  [633,]    0    0
##  [634,]    0    0
##  [635,]    0    0
##  [636,]    0    0
##  [637,]    0    0
##  [638,]    0    0
##  [639,]    0    0
##  [640,]    0    0
##  [641,]    0    0
##  [642,]    0    0
##  [643,]    0    0
##  [644,]    0    0
##  [645,]    0    0
##  [646,]    0    0
##  [647,]    0    0
##  [648,]    0    0
##  [649,]    0    0
##  [650,]    0    0
##  [651,]    0    0
##  [652,]    0    0
##  [653,]    0    0
##  [654,]    0    0
##  [655,]    0    0
##  [656,]    0    0
##  [657,]    0    0
##  [658,]    0    0
##  [659,]    0    0
##  [660,]    0    0
##  [661,]    0    0
##  [662,]    0    0
##  [663,]    0    0
##  [664,]    0    0
##  [665,]    0    0
##  [666,]    0    0
##  [667,]    0    0
##  [668,]    0    0
##  [669,]    0    0
##  [670,]    0    0
##  [671,]    0    0
##  [672,]    0    0
##  [673,]    0    0
##  [674,]    0    0
##  [675,]    0    0
##  [676,]    0    0
##  [677,]    0    0
##  [678,]    0    0
##  [679,]    0    0
##  [680,]    0    0
##  [681,]    0    0
##  [682,]    0    0
##  [683,]    0    0
##  [684,]    0    0
##  [685,]    0    0
##  [686,]    0    0
##  [687,]    0    0
##  [688,]    0    0
##  [689,]    0    0
##  [690,]    0    0
##  [691,]    0    0
##  [692,]    0    0
##  [693,]    0    0
##  [694,]    0    0
##  [695,]    0    0
##  [696,]    0    0
##  [697,]    0    0
##  [698,]    0    0
##  [699,]    0    0
##  [700,]    0    0
##  [701,]    0    0
##  [702,]    0    0
##  [703,]    0    0
##  [704,]    0    0
##  [705,]    0    0
##  [706,]    0    0
##  [707,]    0    0
##  [708,]    0    0
##  [709,]    0    0
##  [710,]    0    0
##  [711,]    0    0
##  [712,]    0    0
##  [713,]    0    0
##  [714,]    0    0
##  [715,]    0    0
##  [716,]    0    0
##  [717,]    0    0
##  [718,]    0    0
##  [719,]    0    0
##  [720,]    0    0
##  [721,]    0    0
##  [722,]    0    0
##  [723,]    0    0
##  [724,]    0    0
##  [725,]    0    0
##  [726,]    0    0
##  [727,]    0    0
##  [728,]    0    0
##  [729,]    0    0
##  [730,]    0    0
##  [731,]    0    0
##  [732,]    0    0
##  [733,]    0    0
##  [734,]    0    0
##  [735,]    0    0
##  [736,]    0    0
##  [737,]    0    0
##  [738,]    0    0
##  [739,]    0    0
##  [740,]    0    0
##  [741,]    0    0
##  [742,]    0    0
##  [743,]    0    0
##  [744,]    0    0
##  [745,]    0    0
##  [746,]    0    0
##  [747,]    0    0
##  [748,]    0    0
##  [749,]    0    0
##  [750,]    0    0
##  [751,]    0    0
##  [752,]    0    0
##  [753,]    0    0
##  [754,]    0    0
##  [755,]    0    0
##  [756,]    0    0
##  [757,]    0    0
##  [758,]    0    0
##  [759,]    0    0
##  [760,]    0    0
##  [761,]    0    0
##  [762,]    0    0
##  [763,]    0    0
##  [764,]    0    0
##  [765,]    0    0
##  [766,]    0    0
##  [767,]    0    0
##  [768,]    0    0
##  [769,]    0    0
##  [770,]    0    0
##  [771,]    0    0
##  [772,]    0    0
##  [773,]    0    0
##  [774,]    0    0
##  [775,]    0    0
##  [776,]    0    0
##  [777,]    0    0
##  [778,]    0    0
##  [779,]    0    0
##  [780,]    0    0
##  [781,]    0    0
##  [782,]    0    0
##  [783,]    0    0
##  [784,]    0    0
##  [785,]    0    0
##  [786,]    0    0
##  [787,]    0    0
##  [788,]    0    0
##  [789,]    0    0
##  [790,]    0    0
##  [791,]    0    0
##  [792,]    0    0
##  [793,]    0    0
##  [794,]    0    0
##  [795,]    0    0
##  [796,]    0    0
##  [797,]    0    0
##  [798,]    0    0
##  [799,]    0    0
##  [800,]    0    0
##  [801,]    0    0
##  [802,]    0    0
##  [803,]    0    0
##  [804,]    0    0
##  [805,]    0    0
##  [806,]    0    0
##  [807,]    0    0
##  [808,]    0    0
##  [809,]    0    0
##  [810,]    0    0
##  [811,]    0    0
##  [812,]    0    0
##  [813,]    0    0
##  [814,]    0    0
##  [815,]    0    0
##  [816,]    0    0
##  [817,]    0    0
##  [818,]    0    0
##  [819,]    0    0
##  [820,]    0    0
##  [821,]    0    0
##  [822,]    0    0
##  [823,]    0    0
##  [824,]    0    0
##  [825,]    0    0
##  [826,]    0    0
##  [827,]    0    0
##  [828,]    0    0
##  [829,]    0    0
##  [830,]    0    0
##  [831,]    0    0
##  [832,]    0    0
##  [833,]    0    0
##  [834,]    0    0
##  [835,]    0    0
##  [836,]    0    0
##  [837,]    0    0
##  [838,]    0    0
##  [839,]    0    0
##  [840,]    0    0
##  [841,]    0    0
##  [842,]    0    0
##  [843,]    0    0
##  [844,]    0    0
##  [845,]    0    0
##  [846,]    0    0
##  [847,]    0    0
##  [848,]    0    0
##  [849,]    0    0
##  [850,]    0    0
##  [851,]    0    0
##  [852,]    0    0
##  [853,]    0    0
##  [854,]    0    0
##  [855,]    0    0
##  [856,]    0    0
##  [857,]    0    0
##  [858,]    0    0
##  [859,]    0    0
##  [860,]    0    0
##  [861,]    0    0
##  [862,]    0    0
##  [863,]    0    0
##  [864,]    0    0
##  [865,]    0    0
##  [866,]    0    0
##  [867,]    0    0
##  [868,]    0    0
##  [869,]    0    0
##  [870,]    0    0
##  [871,]    0    0
##  [872,]    0    0
##  [873,]    0    0
##  [874,]    0    0
##  [875,]    0    0
##  [876,]    0    0
##  [877,]    0    0
##  [878,]    0    0
##  [879,]    0    0
##  [880,]    0    0
##  [881,]    0    0
##  [882,]    0    0
##  [883,]    0    0
##  [884,]    0    0
##  [885,]    0    0
##  [886,]    0    0
##  [887,]    0    0
##  [888,]    0    0
##  [889,]    0    0
##  [890,]    0    0
##  [891,]    0    0
##  [892,]    0    0
##  [893,]    0    0
##  [894,]    0    0
##  [895,]    0    0
##  [896,]    0    0
##  [897,]    0    0
##  [898,]    0    0
##  [899,]    0    0
##  [900,]    0    0
##  [901,]    0    0
##  [902,]    0    0
##  [903,]    0    0
##  [904,]    0    0
##  [905,]    0    0
##  [906,]    0    0
##  [907,]    0    0
##  [908,]    0    0
##  [909,]    0    0
##  [910,]    0    0
##  [911,]    0    0
##  [912,]    0    0
##  [913,]    0    0
##  [914,]    0    0
##  [915,]    0    0
##  [916,]    0    0
##  [917,]    0    0
##  [918,]    0    0
##  [919,]    0    0
##  [920,]    0    0
##  [921,]    0    0
##  [922,]    0    0
##  [923,]    0    0
##  [924,]    0    0
##  [925,]    0    0
##  [926,]    0    0
##  [927,]    0    0
##  [928,]    0    0
##  [929,]    0    0
##  [930,]    0    0
##  [931,]    0    0
##  [932,]    0    0
##  [933,]    0    0
##  [934,]    0    0
##  [935,]    0    0
##  [936,]    0    0
##  [937,]    0    0
##  [938,]    0    0
##  [939,]    0    0
##  [940,]    0    0
##  [941,]    0    0
##  [942,]    0    0
##  [943,]    0    0
##  [944,]    0    0
##  [945,]    0    0
##  [946,]    0    0
##  [947,]    0    0
##  [948,]    0    0
##  [949,]    0    0
##  [950,]    0    0
##  [951,]    0    0
##  [952,]    0    0
##  [953,]    0    0
##  [954,]    0    0
##  [955,]    0    0
##  [956,]    0    0
##  [957,]    0    0
##  [958,]    0    0
##  [959,]    0    0
##  [960,]    0    0
##  [961,]    0    0
##  [962,]    0    0
##  [963,]    0    0
##  [964,]    0    0
##  [965,]    0    0
##  [966,]    0    0
##  [967,]    0    0
##  [968,]    0    0
##  [969,]    0    0
##  [970,]    0    0
##  [971,]    0    0
##  [972,]    0    0
##  [973,]    0    0
##  [974,]    0    0
##  [975,]    0    0
##  [976,]    0    0
##  [977,]    0    0
##  [978,]    0    0
##  [979,]    0    0
##  [980,]    0    0
##  [981,]    0    0
##  [982,]    0    0
##  [983,]    0    0
##  [984,]    0    0
##  [985,]    0    0
##  [986,]    0    0
##  [987,]    0    0
##  [988,]    0    0
##  [989,]    0    0
##  [990,]    0    0
##  [991,]    0    0
##  [992,]    0    0
##  [993,]    0    0
##  [994,]    0    0
##  [995,]    0    0
##  [996,]    0    0
##  [997,]    0    0
##  [998,]    0    0
##  [999,]    0    0
## [1000,]    0    0
# serie = Matrice
# Reprsésentation graphique de la matrice
plot.ts(serie)

# Détermination de l'ordre du modèle

VARselect(serie, lag.max = 4)
## $selection
## AIC(n)  HQ(n)  SC(n) FPE(n) 
##      3      3      2      3 
## 
## $criteria
##                 1          2           3          4
## AIC(n) 0.09772915 0.01805163 0.007561659 0.01076156
## HQ(n)  0.10895884 0.03676778 0.033764271 0.04445063
## SC(n)  0.12726979 0.06728604 0.076489833 0.09938349
## FPE(n) 1.10266413 1.01821572 1.007590787 1.01082066
# Estimation des modèles avec l'ordre 1,, 2, 3 et 4

### Estimation avec l'ordre 1
est_var1 = VAR(serie, p = 1)
est_var1
## 
## VAR Estimation Results:
## ======================= 
## 
## Estimated coefficients for equation serie1: 
## =========================================== 
## Call:
## serie1 = serie1.l1 + serie2.l1 + const 
## 
##   serie1.l1   serie2.l1       const 
## -0.04084429  0.29489500  0.04871146 
## 
## 
## Estimated coefficients for equation serie2: 
## =========================================== 
## Call:
## serie2 = serie1.l1 + serie2.l1 + const 
## 
##    serie1.l1    serie2.l1        const 
## -0.001539104  0.564790731  0.010048044
### Estimatio avec l'ordre 2
est_var2 = VAR(serie, p = 2)
summary(est_var2)
## 
## VAR Estimation Results:
## ========================= 
## Endogenous variables: serie1, serie2 
## Deterministic variables: const 
## Sample size: 998 
## Log Likelihood: -2833.457 
## Roots of the characteristic polynomial:
## 0.5334 0.5334 0.2013 0.2013
## Call:
## VAR(y = serie, p = 2)
## 
## 
## Estimation results for equation serie1: 
## ======================================= 
## serie1 = serie1.l1 + serie2.l1 + serie1.l2 + serie2.l2 + const 
## 
##           Estimate Std. Error t value Pr(>|t|)    
## serie1.l1 -0.05215    0.03675  -1.419  0.15628    
## serie2.l1  0.38340    0.04106   9.338  < 2e-16 ***
## serie1.l2 -0.05519    0.03660  -1.508  0.13185    
## serie2.l2 -0.11573    0.04044  -2.861  0.00431 ** 
## const      0.05301    0.03681   1.440  0.15016    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## 
## Residual standard error: 1.16 on 993 degrees of freedom
## Multiple R-Squared: 0.09894, Adjusted R-squared: 0.09531 
## F-statistic: 27.26 on 4 and 993 DF,  p-value: < 2.2e-16 
## 
## 
## Estimation results for equation serie2: 
## ======================================= 
## serie2 = serie1.l1 + serie2.l1 + serie1.l2 + serie2.l2 + const 
## 
##           Estimate Std. Error t value Pr(>|t|)    
## serie1.l1 -0.01696    0.03179  -0.533    0.594    
## serie2.l1  0.73449    0.03552  20.680  < 2e-16 ***
## serie1.l2 -0.02933    0.03166  -0.927    0.354    
## serie2.l2 -0.27041    0.03499  -7.729 2.65e-14 ***
## const      0.01608    0.03184   0.505    0.614    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## 
## Residual standard error: 1.004 on 993 degrees of freedom
## Multiple R-Squared: 0.3743,  Adjusted R-squared: 0.3718 
## F-statistic: 148.5 on 4 and 993 DF,  p-value: < 2.2e-16 
## 
## 
## 
## Covariance matrix of residuals:
##        serie1 serie2
## serie1 1.3464 0.5865
## serie2 0.5865 1.0076
## 
## Correlation matrix of residuals:
##        serie1 serie2
## serie1 1.0000 0.5036
## serie2 0.5036 1.0000
### Estimation avec l'ordre 3
est_var3 = VAR(serie, p = 3)
summary(est_var3)
## 
## VAR Estimation Results:
## ========================= 
## Endogenous variables: serie1, serie2 
## Deterministic variables: const 
## Sample size: 997 
## Log Likelihood: -2822.065 
## Roots of the characteristic polynomial:
## 0.5024 0.4991 0.4991 0.315 0.315 0.2332
## Call:
## VAR(y = serie, p = 3)
## 
## 
## Estimation results for equation serie1: 
## ======================================= 
## serie1 = serie1.l1 + serie2.l1 + serie1.l2 + serie2.l2 + serie1.l3 + serie2.l3 + const 
## 
##           Estimate Std. Error t value Pr(>|t|)    
## serie1.l1 -0.05108    0.03677  -1.389 0.165145    
## serie2.l1  0.40092    0.04247   9.441  < 2e-16 ***
## serie1.l2 -0.04837    0.03678  -1.315 0.188683    
## serie2.l2 -0.16441    0.04910  -3.348 0.000844 ***
## serie1.l3  0.04557    0.03661   1.245 0.213497    
## serie2.l3  0.03667    0.04170   0.879 0.379390    
## const      0.05017    0.03685   1.362 0.173611    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## 
## Residual standard error: 1.159 on 990 degrees of freedom
## Multiple R-Squared: 0.1023,  Adjusted R-squared: 0.09682 
## F-statistic:  18.8 on 6 and 990 DF,  p-value: < 2.2e-16 
## 
## 
## Estimation results for equation serie2: 
## ======================================= 
## serie2 = serie1.l1 + serie2.l1 + serie1.l2 + serie2.l2 + serie1.l3 + serie2.l3 + const 
## 
##           Estimate Std. Error t value Pr(>|t|)    
## serie1.l1 -0.01719    0.03159  -0.544  0.58648    
## serie2.l1  0.77181    0.03648  21.158  < 2e-16 ***
## serie1.l2 -0.01912    0.03159  -0.605  0.54512    
## serie2.l2 -0.36887    0.04218  -8.745  < 2e-16 ***
## serie1.l3  0.04743    0.03145   1.508  0.13189    
## serie2.l3  0.10170    0.03582   2.839  0.00462 ** 
## const      0.01182    0.03165   0.373  0.70897    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## 
## Residual standard error: 0.996 on 990 degrees of freedom
## Multiple R-Squared: 0.3852,  Adjusted R-squared: 0.3815 
## F-statistic: 103.4 on 6 and 990 DF,  p-value: < 2.2e-16 
## 
## 
## 
## Covariance matrix of residuals:
##        serie1 serie2
## serie1 1.3444 0.5782
## serie2 0.5782 0.9921
## 
## Correlation matrix of residuals:
##        serie1 serie2
## serie1 1.0000 0.5006
## serie2 0.5006 1.0000
### Estimation avec l'ordre 4
est_var4 = VAR(serie, p = 4)
summary(est_var4)
## 
## VAR Estimation Results:
## ========================= 
## Endogenous variables: serie1, serie2 
## Deterministic variables: const 
## Sample size: 996 
## Log Likelihood: -2813.885 
## Roots of the characteristic polynomial:
## 0.5311 0.5311 0.4831 0.4831 0.3626 0.3626 0.3331 0.1117
## Call:
## VAR(y = serie, p = 4)
## 
## 
## Estimation results for equation serie1: 
## ======================================= 
## serie1 = serie1.l1 + serie2.l1 + serie1.l2 + serie2.l2 + serie1.l3 + serie2.l3 + serie1.l4 + serie2.l4 + const 
## 
##            Estimate Std. Error t value Pr(>|t|)    
## serie1.l1 -0.050227   0.036695  -1.369  0.17138    
## serie2.l1  0.402068   0.042666   9.424  < 2e-16 ***
## serie1.l2 -0.050439   0.036730  -1.373  0.17000    
## serie2.l2 -0.163548   0.051095  -3.201  0.00141 ** 
## serie1.l3  0.037699   0.036722   1.027  0.30486    
## serie2.l3  0.047761   0.050992   0.937  0.34918    
## serie1.l4  0.009177   0.036600   0.251  0.80207    
## serie2.l4 -0.015513   0.041785  -0.371  0.71053    
## const      0.047031   0.036817   1.277  0.20175    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## 
## Residual standard error: 1.157 on 987 degrees of freedom
## Multiple R-Squared: 0.1036,  Adjusted R-squared: 0.09633 
## F-statistic: 14.26 on 8 and 987 DF,  p-value: < 2.2e-16 
## 
## 
## Estimation results for equation serie2: 
## ======================================= 
## serie2 = serie1.l1 + serie2.l1 + serie1.l2 + serie2.l2 + serie1.l3 + serie2.l3 + serie1.l4 + serie2.l4 + const 
## 
##           Estimate Std. Error t value Pr(>|t|)    
## serie1.l1 -0.01794    0.03156  -0.568 0.569893    
## serie2.l1  0.77908    0.03670  21.228  < 2e-16 ***
## serie1.l2 -0.01790    0.03159  -0.566 0.571228    
## serie2.l2 -0.39012    0.04395  -8.876  < 2e-16 ***
## serie1.l3  0.04260    0.03159   1.349 0.177721    
## serie2.l3  0.14963    0.04386   3.411 0.000673 ***
## serie1.l4  0.02229    0.03148   0.708 0.479100    
## serie2.l4 -0.07277    0.03594  -2.025 0.043183 *  
## const      0.01077    0.03167   0.340 0.733766    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## 
## Residual standard error: 0.995 on 987 degrees of freedom
## Multiple R-Squared: 0.3882,  Adjusted R-squared: 0.3833 
## F-statistic: 78.29 on 8 and 987 DF,  p-value: < 2.2e-16 
## 
## 
## 
## Covariance matrix of residuals:
##        serie1 serie2
## serie1  1.338  0.576
## serie2  0.576  0.990
## 
## Correlation matrix of residuals:
##        serie1 serie2
## serie1 1.0000 0.5005
## serie2 0.5005 1.0000
coef(est_var1)
## $serie1
##              Estimate Std. Error   t value     Pr(>|t|)
## serie1.l1 -0.04084429 0.03685864 -1.108133 2.680718e-01
## serie2.l1  0.29489500 0.03550303  8.306192 3.201894e-16
## const      0.04871146 0.03705583  1.314542 1.889664e-01
## 
## $serie2
##               Estimate Std. Error     t value     Pr(>|t|)
## serie1.l1 -0.001539104 0.03298908 -0.04665495 9.627976e-01
## serie2.l1  0.564790731 0.03177579 17.77424762 1.333990e-61
## const      0.010048044 0.03316557  0.30296613 7.619789e-01

Commentaires

Les coefficients des modèles sont singificatifs pour un modèle var d’ordre 2 et 3

# Analyses des résidus
resid2 = resid(est_var2)
resid3 = resid(est_var3)
resultat_test2 = serial.test(est_var2, lags.pt = 10, type = "PT.asymptotic")
resultat_test3 = serial.test(est_var3, lags.pt = 10, type = "PT.asymptotic")

D’après les résultats, le test d’autocorrélation montre que le modèle d’ordre 3 est celui à retenir.

plot(resultat_test3)

# Test de normalité des résidus
resultat_normalites = normality.test(est_var2)
# Prévision 
previsions = predict(est_var2, n.ahead = 20, colors = "red")

### Visualisation
plot(previsions, xlim = c(950, 1100))

# Une autre méthide de  prévision
fanchart(previsions, colors = "red")

# Test de causalité des séries
causality(est_var2, cause = "serie1")
## $Granger
## 
##  Granger causality H0: serie1 do not Granger-cause serie2
## 
## data:  VAR object est_var2
## F-Test = 0.55203, df1 = 2, df2 = 1986, p-value = 0.5759
## 
## 
## $Instant
## 
##  H0: No instantaneous causality between: serie1 and serie2
## 
## data:  VAR object est_var2
## Chi-squared = 201.87, df = 1, p-value < 2.2e-16
causality(est_var2, cause = "serie2")
## $Granger
## 
##  Granger causality H0: serie2 do not Granger-cause serie1
## 
## data:  VAR object est_var2
## F-Test = 44.494, df1 = 2, df2 = 1986, p-value < 2.2e-16
## 
## 
## $Instant
## 
##  H0: No instantaneous causality between: serie2 and serie1
## 
## data:  VAR object est_var2
## Chi-squared = 201.87, df = 1, p-value < 2.2e-16
# Chocs /// Fonctions de réponse
chocs = irf(est_var2, impute = c("serie1", "serie2"), reponse = c("serie1", "seie2"), n.ahead = 10)

plot(chocs)

# Décomposition de la variance
fevd_results = fevd(est_var2)
plot(fevd_results)