命令如下：
xr <- AnnualData[,'xr']
for(i in c(3,5,7,9,12)){
temp <- lag(filter(xr, rep(1, i), sides = 1),i)
print(temp)
}
结果如下，是多个时序加总，请问如何拆分为为单独的一列？
Time Series:
Start = 1869
End = 2012
Frequency = 1
[1] NA NA NA NA NA NA NA
[8] NA NA NA NA NA NA NA
[15] NA NA NA NA NA NA NA
[22] NA NA NA NA NA NA NA
[29] NA NA NA NA NA NA NA
[36] NA NA NA NA NA NA NA
[43] NA NA NA NA NA NA NA
[50] NA NA NA NA NA NA NA
[57] 0.764236656 0.554285076 -0.050635087 -0.875828709 -0.846489110 -0.039048870 0.413162464
[64] 0.957300523 0.760667155 0.426773750 0.264727099 -0.079693687 0.183349792 -0.226706403
[71] -0.009455197 0.351395415 0.676501089 0.833537548 0.474082212 0.305839593 -0.016023919
[78] 0.250147100 0.526614420 0.702583215 0.701531204 0.352397853 0.650430387 0.769490398
[85] 0.834739872 0.181209006 0.303343372 0.350277325 0.472225898 0.307579239 0.112289334
[92] 0.320551833 0.203874406 0.402360492 0.059141415 0.120663873 0.087025680 0.077194759
[99] -0.121549741 -0.065806360 0.236051377 0.022414666 -0.417756667 -0.243002856 0.175122965
[106] 0.375918587 0.034008663 -0.096173623 0.209794271 0.079340446 0.155868745 0.117735308
[113] 0.261173330 0.367961741 0.360453373 0.368012193 0.208135555 0.320190112 0.227010116
[120] 0.404109341 0.211705217 0.379338486 0.070928223 0.351164230 0.465931262 0.792802804
[127] 0.716667628 0.695112132 0.267864606 -0.117246411 -0.508445617 -0.087754721 0.136035366
[134] 0.378885421 0.209248539 0.148648020 -0.229405899 -0.073383055 0.049550171 0.432570697
[141] 0.327945325 0.502037301 0.619002877 0.471607598
Time Series:
Start = 1867
End = 2010
Frequency = 1
[1] NA NA NA NA NA NA NA
[8] NA NA NA NA NA NA NA
[15] NA NA NA NA NA NA NA
[22] NA NA NA NA NA NA NA
[29] NA NA NA NA NA NA NA
[36] NA NA NA NA NA NA NA
[43] NA NA NA NA NA NA NA
[50] NA NA NA NA NA NA NA
[57] NA NA 0.367761160 -0.202896656 -0.619295680 -0.435524366 -0.344019267
[64] 0.388639931 1.200971499 0.929243593 0.692415900 0.708115347 0.155292862 -0.294957658
[71] 0.271886401 0.241961178 0.461237117 0.922074157 0.942749793 0.776531907 0.554654822
[78] 0.516395804 0.469608779 0.783155825 0.912087415 0.838030551 1.183439113 1.154963393
[85] 0.970187208 0.663116915 1.105908912 0.670034146 0.365852415 0.578748279 0.601114474
[92] 0.383060876 0.432345359 0.531249068 0.134623052 0.440719898 0.297722916 0.007943405
[99] -0.083190335 0.172775141 0.123330910 -0.147801350 -0.322176285 0.001877794 0.093127975
[106] -0.182309075 0.013471792 0.414711020 0.270488053 -0.082310728 0.194661177 0.354214698
[113] 0.275036225 0.352828646 0.635327625 0.487179673 0.443228893 0.694344406 0.346228049
[120] 0.486884862 0.538037431 0.517430979 0.237622973 0.662191546 0.579252900 0.818720559
[127] 0.999520688 1.203436809 0.735420934 0.416343014 -0.097811611 -0.069001415 -0.142733751
[134] 0.013209204 0.257493535 0.514359885 -0.128441973 0.048075114 0.185024635 0.094880185
[141] 0.227372420 0.916467835 0.787266117 0.649429847
Time Series:
Start = 1865
End = 2008
Frequency = 1
[1] NA NA NA NA NA NA NA
[8] NA NA NA NA NA NA NA
[15] NA NA NA NA NA NA NA
[22] NA NA NA NA NA NA NA
[29] NA NA NA NA NA NA NA
[36] NA NA NA NA NA NA NA
[43] NA NA NA NA NA NA NA
[50] NA NA NA NA NA NA NA
[57] NA NA NA NA -0.200899432 0.237407688 -0.116825836
[64] -0.007835565 0.443789767 0.360583000 1.132720244 1.210585191 0.582981663 0.492851376
[71] 0.243829471 0.173709923 0.742578715 0.812639920 0.727485822 0.865068516 1.023322403
[78] 0.987088118 1.040287520 1.049404530 0.855081773 0.918603162 1.393995324 1.640596091
[85] 1.503195934 1.048589910 1.241356248 1.151942055 1.168417955 0.898505100 0.494740991
[92] 0.654229916 0.921170499 0.593758111 0.363094005 0.569608474 0.373204553 0.327999430
[99] 0.127506900 0.103523787 0.161690316 0.090780151 -0.434896753 -0.168338221 0.188708357
[106] 0.062571576 -0.068523198 -0.143516643 0.249951181 0.428573915 0.255354958 0.192563524
[113] 0.313828658 0.589308036 0.649190520 0.472046579 0.718103145 0.813511887 0.581321387
[120] 0.861039156 0.657255364 0.600206500 0.563955186 0.800284039 0.745947650 1.129747874
[127] 1.112842326 1.229354565 1.018273994 0.924667692 0.369744718 0.464588011 0.267900254
[134] 0.031962511 -0.021275582 0.148683668 -0.080196977 0.413786980 0.285988560 0.216338354
[141] 0.362846883 0.578777323 0.686693211 1.063860380
Time Series:
Start = 1863
End = 2006
Frequency = 1
[1] NA NA NA NA NA NA NA NA
[9] NA NA NA NA NA NA NA NA
[17] NA NA NA NA NA NA NA NA
[25] NA NA NA NA NA NA NA NA
[33] NA NA NA NA NA NA NA NA
[41] NA NA NA NA NA NA NA NA
[49] NA NA NA NA NA NA NA NA
[57] NA NA NA NA NA NA 0.30157041 0.66509649
[65] 0.67098320 -0.03589250 0.37553851 0.64192460 1.02328601 0.99532122 0.67151827 0.96151896
[73] 0.71452178 0.74438866 1.00882742 0.75563428 0.80805843 1.07562473 1.50895510 1.52009684
[81] 1.42576051 1.18485187 1.33698968 1.72116870 1.71375214 1.53422261 1.77436497 1.53741505
[89] 1.30386529 1.38041301 1.29730653 0.97398674 0.81479702 0.86492715 0.85191915 0.63211752
[97] 0.60167551 0.45688801 0.20298854 0.42357981 0.37238755 0.02152880 -0.39653735 0.07024328
[105] 0.07598789 -0.10764444 0.02705718 0.10136401 0.16795619 -0.12965375 0.23481809 0.70344817
[113] 0.37452244 0.42765686 0.68798295 0.70852597 0.73196604 0.79837879 0.85619564 0.98020664
[121] 0.89234870 0.97436079 0.68317312 0.88305956 1.07227986 1.26784037 1.27953708 1.54038188
[129] 1.13159563 0.95058545 0.65259778 0.97291269 0.73545658 0.56555194 0.38935842 0.16743697
[137] -0.35896609 0.04811076 0.33423356 0.58205022 0.46381081 0.70023549 0.82216768 0.72616987
Time Series:
Start = 1860
End = 2003
Frequency = 1
[1] NA NA NA NA NA NA NA
[8] NA NA NA NA NA NA NA
[15] NA NA NA NA NA NA NA
[22] NA NA NA NA NA NA NA
[29] NA NA NA NA NA NA NA
[36] NA NA NA NA NA NA NA
[43] NA NA NA NA NA NA NA
[50] NA NA NA NA NA NA NA
[57] NA NA NA NA NA NA NA
[64] NA NA 0.728344161 0.929823588 0.591289511 0.147457297 0.148832109
[71] 0.632469401 1.374681422 1.671822308 1.505055820 1.435601169 1.020361378 0.728364745
[78] 1.258974519 1.282248698 1.510641647 1.777155930 1.861352954 2.170527231 2.195250913
[85] 2.019591738 1.518198689 2.024512073 2.064029470 2.006448506 2.081944213 1.649704385
[92] 1.624417124 1.584287415 1.699667023 1.033128151 0.935460889 0.951952832 0.929113905
[99] 0.510567776 0.535869147 0.692939384 0.225403203 0.005823145 0.129384695 0.196651762
[106] -0.020618759 0.104251943 -0.020185733 0.102149832 0.106397630 0.257232753 0.285691499
[113] 0.131519583 0.602779828 1.063901540 0.742534632 0.635792418 1.008173064 0.935536084
[120] 1.136075382 1.010084010 1.235534125 1.051134860 1.243512932 1.440292057 1.475975923
[127] 1.599727188 1.767391996 1.535704973 1.162290665 1.031936263 1.043840911 1.086620813
[134] 1.031483198 1.182161227 0.884104603 0.336146037 0.315975369 0.216987145 0.073604602
[141] 0.376056088 0.836270858 1.201053096 0.935418407
扫码加好友，拉您进群
全部版块
我的主页
收藏
