# [R] Find the flow data from its accumulation of the panel data

Blaser Nello nblaser at ispm.unibe.ch
Fri May 3 08:42:23 CEST 2013

```Hi

I assume the Col1 code 16 stands for 2001Q4 not 2011Q4. Anyway, here is
one possible solution.

# rename and add yearly variable
names(bank_incst)[1] <- "quarter"
bank_incst[, "year"] <- ceiling(bank_incst[, "quarter"]/4)

# split by name and year
lst <- split(bank_incst, paste(bank_incst[,"name"],
bank_incst[,"year"]))

# calculate difference by name and year
reslst <- lapply(lst, function(x) {
y <- x
y[,"expense_Q"] <- c(x[1,"expense"], diff(x[,"expense"]))
y[,"cost_Q"] <- c(x[1,"cost"], diff(x[,"cost"]))
y[,"prov_Q"] <- c(x[1,"prov"], diff(x[,"prov"]))
return(y)
})

# combine results and sort data
df <- do.call(rbind, reslst)
df <- df[order(df[,"name"]), ]
df <- df[order(df[,"quarter"]), ]
rownames(df) <- rownames(bank_incst)

Best,
Nello

-----Original Message-----
From: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org]
On Behalf Of jpm miao
Sent: Freitag, 3. Mai 2013 05:29
To: r-help
Subject: [R] Find the flow data from its accumulation of the panel data

Hi,

I have the panel data of income statement of several banks. The date
9803 means 1998-Q1, 9806 means 1998-Q2, etc. I transform the date code
to 1
(for 1998Q1), 2 (for 1998Q2), ...., 16 (for 2011Q4) where 1, 2, .... are
placed in Col1.

Now the income statement of a specific quarter is actually the
accumulation from the beginning of the year. For example, the cost data
of
1999Q3 is the cost from January to September 1999. Now, to find the cost
in
1999Q3, I need to subtract the data of 1999Q2 from the data of 1999Q3.
Is
there an easy way to process the whole dataset?

Thanks

> bank_incst
Col1       cpi  date name expense  cost  prov
1      1  96.66333  9803    4    3675  5919  2244
2      1  96.66333  9803    5    2776  3596   820
3      1  96.66333  9803    6    4422  6365  1943
4      1  96.66333  9803    7    3394  5120  1726
5      1  96.66333  9803    8    3429  4983  1554
6      1  96.66333  9803    9    2795  4232  1437
7      1  96.66333  9803   10     949  1582   633
8      1  96.66333  9803   11    1050  1424   374
9      1  96.66333  9803   12    2993  3825   832
10     1  96.66333  9803   13    3439  4215   776
11     1  96.66333  9803   15     109   141    32
12     1  96.66333  9803   16     442   473    31
13     1  96.66333  9803   17    3571  6330  2759
14     1  96.66333  9803   18      96    96    NA
15     1  96.66333  9803   40     362   229  -133
16     1  96.66333  9803   48     233   276    43
17     1  96.66333  9803   50    2413  3277   864
18     1  96.66333  9803   52    2609  4040  1431
19     1  96.66333  9803   53     716  1117   401
20     1  96.66333  9803   54     387   588   201
21     1  96.66333  9803  101     151   174    23
22     1  96.66333  9803  102     301   365    64
23     1  96.66333  9803  103    1255  1796   541
24     1  96.66333  9803  108     629   789   160
25     1  96.66333  9803  118     447   481    34
26     1  96.66333  9803  147     330   438   108
27     1  96.66333  9803  803    1145  1723   578
28     1  96.66333  9803  805     932  1122   190
29     1  96.66333  9803  806    1049  1260   211
30     1  96.66333  9803  807    2068  2725   657
31     1  96.66333  9803  808    2014  2566   552
32     1  96.66333  9803  809    1461  2921  1460
33     1  96.66333  9803  812    2695  4442  1747
34     1  96.66333  9803  814    1096  1588   492
35     1  96.66333  9803  815     813  1432   619
36     1  96.66333  9803  816     599   799   200
37     1  96.66333  9803  822    6465  8078  1613
38     1  96.66333  9803  825     422   844   422
39     2  97.21333  9806    4    7943 10038  2095
40     2  97.21333  9806    5    5784  6930  1146
41     2  97.21333  9806    6    8892 12307  3415
42     2  97.21333  9806    7    6819  9797  2978
43     2  97.21333  9806    8    6789 10160  3371
44     2  97.21333  9806    9    5616  8129  2513
45     2  97.21333  9806   10    1985  3116  1131
46     2  97.21333  9806   11    2124  2945   821
47     2  97.21333  9806   12    5925  7555  1630
48     2  97.21333  9806   13    6799  7087   288
49     2  97.21333  9806   15     238   317    79
50     2  97.21333  9806   16     823  1008   185
51     2  97.21333  9806   17    7057 11710  4653
52     2  97.21333  9806   18     188   188    NA
53     2  97.21333  9806   40     721   500  -221
54     2  97.21333  9806   48     513   568    55
55     2  97.21333  9806   50    4687  6315  1628
56     2  97.21333  9806   52    4727  7613  2886
57     2  97.21333  9806   53    1343  1857   514
58     2  97.21333  9806   54     785  1302   517
59     2  97.21333  9806  101     296   316    20
60     2  97.21333  9806  102     600   720   120
61     2  97.21333  9806  103    2460  3331   871
62     2  97.21333  9806  108    1251  1593   342
63     2  97.21333  9806  118     906   967    61
64     2  97.21333  9806  147     620   811   191
65     2  97.21333  9806  803    2309  3120   811
66     2  97.21333  9806  805    1826  2185   359
67     2  97.21333  9806  806    2120  2424   304
68     2  97.21333  9806  807    4045  5421  1376
69     2  97.21333  9806  808    3997  4962   965
70     2  97.21333  9806  809    2429  4831  2402
71     2  97.21333  9806  812    5358  8494  3136
72     2  97.21333  9806  814    2228  3010   782
73     2  97.21333  9806  815    1543  6888  5345
74     2  97.21333  9806  816    1219  1484   265
75     2  97.21333  9806  822   12924 15518  2594
76     2  97.21333  9806  825     821  1253   432
77     3  98.43333  9809    4   11771 15527  3756
78     3  98.43333  9809    5    8707 10122  1415
79     3  98.43333  9809    6   13539 17281  3742
80     3  98.43333  9809    7   10165 14968  4803
81     3  98.43333  9809    8   10195 15914  5719
82     3  98.43333  9809    9    8467 12385  3918
83     3  98.43333  9809   11    3224  4194   970
84     3  98.43333  9809   12    8894 11265  2371
85     3  98.43333  9809   13   10431 10594   163
86     3  98.43333  9809   15     356   445    89
87     3  98.43333  9809   16    1270  1485   215
88     3  98.43333  9809   17   10778 16421  5643
89     3  98.43333  9809   18     299   399   100
90     3  98.43333  9809   21    5079  6559  1480
91     3  98.43333  9809   40    1114   864  -250
92     3  98.43333  9809   48     758   879   121
93     3  98.43333  9809   50    7012  9433  2421
94     3  98.43333  9809   52    7585 16908  9323
95     3  98.43333  9809   53    2068  2742   674
96     3  98.43333  9809   54    1170  2018   848
97     3  98.43333  9809  101     439   458    19
98     3  98.43333  9809  102     898  1095   197
99     3  98.43333  9809  103    3648  4889  1241
100    3  98.43333  9809  108    1790  2222   432
101    3  98.43333  9809  118    1347  1437    90
102    3  98.43333  9809  147     921  1218   297
103    3  98.43333  9809  803    3392  4486  1094
104    3  98.43333  9809  805    2880  3350   470
105    3  98.43333  9809  806    3208  3549   341
106    3  98.43333  9809  807    6201  8399  2198
107    3  98.43333  9809  808    6137  7518  1381
108    3  98.43333  9809  809    3402  6591  3189
109    3  98.43333  9809  812    8091 11746  3655
110    3  98.43333  9809  814    3409  4339   930
111    3  98.43333  9809  815    2258  7808  5550
112    3  98.43333  9809  816    1855  2728   873
113    3  98.43333  9809  822   19137 22529  3392
114    3  98.43333  9809  825    1206  1705   499
115    4  98.31000  9812    4   16717 21073  4356
116    4  98.31000  9812    5   12374 14139  1765
117    4  98.31000  9812    6   18290 23519  5229
118    4  98.31000  9812    7   13811 24432 10621
119    4  98.31000  9812    8   14132 24776 10644
120    4  98.31000  9812    9   11645 16930  5285
121    4  98.31000  9812   11    5409  6656  1247
122    4  98.31000  9812   12   12300 16305  4005
123    4  98.31000  9812   13   14388 13958  -430
124    4  98.31000  9812   15     494   524    30
125    4  98.31000  9812   16    1728  1946   218
126    4  98.31000  9812   17   14585 20933  6348
127    4  98.31000  9812   18     483   683   200
128    4  98.31000  9812   21    9143  9600   457
129    4  98.31000  9812   40    1630  1569   -61
130    4  98.31000  9812   48    1020  1227   207
131    4  98.31000  9812   50    9451 13107  3656
132    4  98.31000  9812   52   12254 21795  9541
133    4  98.31000  9812   53    2678  3027   349
134    4  98.31000  9812   54    1618  2754  1136
135    4  98.31000  9812  101     583   519   -64
136    4  98.31000  9812  102    1249  1542   293
137    4  98.31000  9812  103    4914  6673  1759
138    4  98.31000  9812  108    2352  2880   528
139    4  98.31000  9812  118    1795  3023  1228
140    4  98.31000  9812  147    1281  1709   428
141    4  98.31000  9812  803    4534  5835  1301
142    4  98.31000  9812  805    4027  5271  1244
143    4  98.31000  9812  806    4340  4695   355
144    4  98.31000  9812  807    8941 11812  2871
145    4  98.31000  9812  808    8275 10752  2477
146    4  98.31000  9812  809    4332  7914  3582
147    4  98.31000  9812  812   11494 16089  4595
148    4  98.31000  9812  814    4722  5657   935
149    4  98.31000  9812  815    3086  9563  6477
150    4  98.31000  9812  816    2493  3190   697
151    4  98.31000  9812  822   27540 31907  4367
152    4  98.31000  9812  825    1649  2255   606
153    5  97.90333  9903    4    3963  4094   131
154    5  97.90333  9903    5    2743  3002   259
155    5  97.90333  9903    6    4584  5495   911
156    5  97.90333  9903    7    3364  5210  1846
157    5  97.90333  9903    8    3476  4891  1415
158    5  97.90333  9903    9    2910  3256   346
159    5  97.90333  9903   11    1060  1224   164
160    5  97.90333  9903   12    2921  3200   279
161    5  97.90333  9903   13    3486  3216  -270
162    5  97.90333  9903   15     104   138    34
163    5  97.90333  9903   16     465   495    30
164    5  97.90333  9903   17    3845  4232   387
165    5  97.90333  9903   18     101   101    NA
166    5  97.90333  9903   21    3759  3908   149
167    5  97.90333  9903   40     473   450   -23
168    5  97.90333  9903   48     236   236    NA
169    5  97.90333  9903   50    2354  3307   953
170    5  97.90333  9903   52    2774  3273   499
171    5  97.90333  9903   53     659   906   247
172    5  97.90333  9903   54     382   602   220
173    5  97.90333  9903  101     137   131    -6
174    5  97.90333  9903  102     303   345    42
175    5  97.90333  9903  103    1209  1657   448
176    5  97.90333  9903  108     528   633   105
177    5  97.90333  9903  118     380   410    30
178    5  97.90333  9903  147     296   437   141
179    5  97.90333  9903  803    1078  1387   309
180    5  97.90333  9903  805    1095  1069   -26
181    5  97.90333  9903  806    1076  1091    15
182    5  97.90333  9903  807    2276  2823   547
183    5  97.90333  9903  808    2191  3033   842
184    5  97.90333  9903  809     898  1159   261
185    5  97.90333  9903  812    2783  3421   638
186    5  97.90333  9903  814    1263  1503   240
187    5  97.90333  9903  815     713   834   121
188    5  97.90333  9903  816     608   323  -285
189    5  97.90333  9903  822    6861  6715  -146
190    5  97.90333  9903  825    1142  1191    49
191    6  98.28000  9906    4    8039  8435   396
192    6  98.28000  9906    5    5826  6451   625
193    6  98.28000  9906    6    9086 11482  2396
194    6  98.28000  9906    7    6890  9624  2734
195    6  98.28000  9906    8    7069  9538  2469
196    6  98.28000  9906    9    5992  7878  1886
197    6  98.28000  9906   11    2147  2389   242
198    6  98.28000  9906   12    6024  6329   305
199    6  98.28000  9906   13    7109  6657  -452
200    6  98.28000  9906   15     221   314    93
201    6  98.28000  9906   16     918  1037   119
202    6  98.28000  9906   17   10807 10667  -140
203    6  98.28000  9906   18     206   536   330
204    6  98.28000  9906   21    6978  7440   462
205    6  98.28000  9906   40     818   601  -217
206    6  98.28000  9906   48     484   484     0
207    6  98.28000  9906   50    4707  7003  2296
208    6  98.28000  9906   52    5313  6104   791
209    6  98.28000  9906   53    1360  1782   422
210    6  98.28000  9906   54     751   913   162
211    6  98.28000  9906   81    1566  1486   -80
212    6  98.28000  9906  101     283   245   -38
213    6  98.28000  9906  102     639   743   104
214    6  98.28000  9906  103    2462  3420   958
215    6  98.28000  9906  108    1084  1289   205
216    6  98.28000  9906  118     899   959    60
217    6  98.28000  9906  147     624   919   295
218    6  98.28000  9906  803    2172  2724   552
219    6  98.28000  9906  805    2342  1955  -387
220    6  98.28000  9906  806    2234  2259    25
221    6  98.28000  9906  807    4529  5601  1072
222    6  98.28000  9906  808    4456  6104  1648
223    6  98.28000  9906  809    1796  1777   -19
224    6  98.28000  9906  812    5549  5979   430
225    6  98.28000  9906  814    2565  3104   539
226    6  98.28000  9906  815    1491  1797   306
227    6  98.28000  9906  816    1306  1320    14
228    6  98.28000  9906  822   13949 13554  -395
229    7  98.80000  9909    4   12256 12991   735
230    7  98.80000  9909    5    8705  9608   903
231    7  98.80000  9909    6   13737 17230  3493
232    7  98.80000  9909    7   10510 14504  3994
233    7  98.80000  9909    8   10670 14596  3926
234    7  98.80000  9909    9    8933 11607  2674
235    7  98.80000  9909   11    3283  3754   471
236    7  98.80000  9909   12    9420  9761   341
237    7  98.80000  9909   13   10794  9775 -1019
238    7  98.80000  9909   15     327   409    82
239    7  98.80000  9909   16    1381  1608   227
240    7  98.80000  9909   17   14481 16108  1627
241    7  98.80000  9909   18     321   771   450
242    7  98.80000  9909   21   10990 11630   640
243    7  98.80000  9909   40    1325  1077  -248
244    7  98.80000  9909   48     770   770     0
245    7  98.80000  9909   50    7159 10201  3042
246    7  98.80000  9909   52    8045  9351  1306
247    7  98.80000  9909   53    2044  2874   830
248    7  98.80000  9909   54    1123  1308   185
249    7  98.80000  9909   81    3813  3628  -185
250    7  98.80000  9909  101     429   389   -40
251    7  98.80000  9909  102     974  1217   243
252    7  98.80000  9909  103    3709  5135  1426
253    7  98.80000  9909  108    1716  2046   330
254    7  98.80000  9909  118    1361  1451    90
255    7  98.80000  9909  147     980  1367   387
256    7  98.80000  9909  803    3316  3835   519
257    7  98.80000  9909  805    3607  3083  -524
258    7  98.80000  9909  806    3371  3368    -3
259    7  98.80000  9909  807    7047  8622  1575
260    7  98.80000  9909  808    6855  9326  2471
261    7  98.80000  9909  809    2778  2374  -404
262    7  98.80000  9909  812    8705  9463   758
263    7  98.80000  9909  814    3994  4833   839
264    7  98.80000  9909  815    2208  2668   460
265    7  98.80000  9909  816    1958  2187   229
266    7  98.80000  9909  822   21033 20965   -68
267    8  99.39667  9912    4   16989 17304   315
268    8  99.39667  9912    5   12785 14815  2030
269    8  99.39667  9912    6   18558 23450  4892
270    8  99.39667  9912    7   14206 19635  5429
271    8  99.39667  9912    8   14475 21033  6558
272    8  99.39667  9912    9   12497 17269  4772
273    8  99.39667  9912   11    4559  5152   593
274    8  99.39667  9912   12   13586 15573  1987
275    8  99.39667  9912   13   14807 14662  -145
276    8  99.39667  9912   15     471   554    83
277    8  99.39667  9912   16    1829  2137   308
278    8  99.39667  9912   17   18889 21017  2128
279    8  99.39667  9912   18     491  1031   540
280    8  99.39667  9912   21   15841 16766   925
281    8  99.39667  9912   40    1749  1432  -317
282    8  99.39667  9912   48     996   992    -4
283    8  99.39667  9912   50    9738 13855  4117
284    8  99.39667  9912   52   10977 11330   353
285    8  99.39667  9912   53    2760  3711   951
286    8  99.39667  9912   54    1493  1678   185
287    8  99.39667  9912   81    6784  6525  -259
288    8  99.39667  9912  101     689   615   -74
289    8  99.39667  9912  102    1334  1754   420
290    8  99.39667  9912  103    5042  6774  1732
291    8  99.39667  9912  108    2406  2781   375
292    8  99.39667  9912  118    1840  1960   120
293    8  99.39667  9912  147    1348  1821   473
294    8  99.39667  9912  803    4644  5481   837
295    8  99.39667  9912  805    4951  4388  -563
296    8  99.39667  9912  806    4581  4406  -175
297    8  99.39667  9912  807    9671 12276  2605
298    8  99.39667  9912  808    9479 12837  3358
299    8  99.39667  9912  809    3767  3780    13
300    8  99.39667  9912  812   12214 13620  1406
301    8  99.39667  9912  814    5403  6392   989
302    8  99.39667  9912  815    2956  3525   569
303    8  99.39667  9912  816    2861  2873    12
304    8  99.39667  9912  822   28824 29841  1017
305    9  99.15333 10003    4    3212  6226  3014
306    9  99.15333 10003    5    2839  2860    21
307    9  99.15333 10003    6    4659  5284   625
308    9  99.15333 10003    7    3665  4995  1330
309    9  99.15333 10003    8    3680  4571   891
310    9  99.15333 10003    9    3041  3283   242
311    9  99.15333 10003   11    1116  1225   109
312    9  99.15333 10003   12    3210  2814  -396
313    9  99.15333 10003   13    4029  3876  -153
314    9  99.15333 10003   15     102   112    10
315    9  99.15333 10003   16     465  1340   875
316    9  99.15333 10003   17    3680  4044   364
317    9  99.15333 10003   18     119   404   285
318    9  99.15333 10003   21    4031  3829  -202
319    9  99.15333 10003   40     338   454   116
320    9  99.15333 10003   48     249   249     0
321    9  99.15333 10003   50    2553  3611  1058
322    9  99.15333 10003   52    2782  2876    94
323    9  99.15333 10003   53     819   830    11
324    9  99.15333 10003   54     354   272   -82
325    9  99.15333 10003   81    2238  1994  -244
326    9  99.15333 10003  101     146   136   -10
327    9  99.15333 10003  102     335   403    68
328    9  99.15333 10003  103    1357  1131  -226
329    9  99.15333 10003  108     536   575    39
330    9  99.15333 10003  118     478   558    80
331    9  99.15333 10003  147     354   489   135
332    9  99.15333 10003  803    1191  1292   101
333    9  99.15333 10003  805    1275   953  -322
334    9  99.15333 10003  806    1213   880  -333
335    9  99.15333 10003  807    2462  2698   236
336    9  99.15333 10003  808    2425  3180   755
337    9  99.15333 10003  809     857   198  -659
338    9  99.15333 10003  812    3092  3667   575
339    9  99.15333 10003  814    1431  1431     0
340    9  99.15333 10003  815     710  1114   404
341    9  99.15333 10003  816     892   921    29
342    9  99.15333 10003  822    7295  7477   182
343   10  99.89333 10006    4    7857 11429  3572
344   10  99.89333 10006    5    5817  5926   109
345   10  99.89333 10006    6    9325 10982  1657
346   10  99.89333 10006    7    7419  9888  2469
347   10  99.89333 10006    8    7542  9259  1717
348   10  99.89333 10006    9    6445  7111   666
349   10  99.89333 10006   11    2379  2567   188
350   10  99.89333 10006   12    6510  5748  -762
351   10  99.89333 10006   13    7851  7844    -7
352   10  99.89333 10006   15     217   257    40
353   10  99.89333 10006   16     877  1751   874
354   10  99.89333 10006   17    7929  8591   662
355   10  99.89333 10006   18     248   551   303
356   10  99.89333 10006   21    8208 10409  2201
357   10  99.89333 10006   40     882   982   100
358   10  99.89333 10006   48     425   722   297
359   10  99.89333 10006   50    5055  7363  2308
360   10  99.89333 10006   52    5424  5368   -56
361   10  99.89333 10006   53    1606  1648    42
362   10  99.89333 10006   54     712   620   -92
363   10  99.89333 10006   81    4343  4731   388
364   10  99.89333 10006  101     280   264   -16
365   10  99.89333 10006  102     695   803   108
366   10  99.89333 10006  103    2736  2508  -228
367   10  99.89333 10006  108    1055  1589   534
368   10  99.89333 10006  118     983  1145   162
369   10  99.89333 10006  147     706   905   199
370   10  99.89333 10006  803    2339  2425    86
371   10  99.89333 10006  805    2524  2061  -463
372   10  99.89333 10006  806    2426  1983  -443
373   10  99.89333 10006  807    5177  5404   227
374   10  99.89333 10006  808    4959  6688  1729
375   10  99.89333 10006  809    1801   669 -1132
376   10  99.89333 10006  812    6359  7475  1116
377   10  99.89333 10006  814    2860  2790   -70
378   10  99.89333 10006  815    1414  1849   435
379   10  99.89333 10006  816    1712  1721     9
380   10  99.89333 10006  822   14879 13594 -1285
381   11 100.13333 10009    4   12432 17063  4631
382   11 100.13333 10009    5    8951  9109   158
383   11 100.13333 10009    6   14231 17641  3410
384   11 100.13333 10009    7   11669 14897  3228
385   11 100.13333 10009    8   11574 14127  2553
386   11 100.13333 10009    9    9496 10646  1150
387   11 100.13333 10009   11    5001  5257   256
388   11 100.13333 10009   12    9908  9292  -616
389   11 100.13333 10009   13   11827 11863    36
390   11 100.13333 10009   15     346   447   101
391   11 100.13333 10009   16    1357  2238   881
392   11 100.13333 10009   17   12065 12331   266
393   11 100.13333 10009   18     380   840   460
394   11 100.13333 10009   21   12539 15140  2601
395   11 100.13333 10009   40    1203  1422   219
396   11 100.13333 10009   48     655   979   324
397   11 100.13333 10009   50    7617 10717  3100
398   11 100.13333 10009   52    7936  4672 -3264
399   11 100.13333 10009   53    2513  2837   324
400   11 100.13333 10009   54    1066   984   -82
401   11 100.13333 10009   81    6796  7417   621
402   11 100.13333 10009  101     432   451    19
403   11 100.13333 10009  102    1051  1218   167
404   11 100.13333 10009  103    4148  4019  -129
405   11 100.13333 10009  108    1741  2313   572
406   11 100.13333 10009  118    1508  2365   857
407   11 100.13333 10009  147    1089  1412   323
408   11 100.13333 10009  803    3570  3896   326
409   11 100.13333 10009  805    3850  3174  -676
410   11 100.13333 10009  806    3677  3196  -481
411   11 100.13333 10009  807    8055  8612   557
412   11 100.13333 10009  808    7761 10075  2314
413   11 100.13333 10009  809    2776  1483 -1293
414   11 100.13333 10009  812    9743 11400  1657
415   11 100.13333 10009  814    4221  4152   -69
416   11 100.13333 10009  815    2148  2803   655
417   11 100.13333 10009  816    2505  2598    93
418   11 100.13333 10009  822   22141 22762   621
419   12 100.82667 10012    4   18103 23146  5043
420   12 100.82667 10012    5   12615 14212  1597
421   12 100.82667 10012    6   19393 24567  5174
422   12 100.82667 10012    7   15618 20786  5168
423   12 100.82667 10012    8   15583 20012  4429
424   12 100.82667 10012    9   12809 16034  3225
425   12 100.82667 10012   11    6351  6678   327
426   12 100.82667 10012   12   13896 15082  1186
427   12 100.82667 10012   13   16372 16898   526
428   12 100.82667 10012   15     472   642   170
429   12 100.82667 10012   16    1847  2746   899
430   12 100.82667 10012   17   15933 18385  2452
431   12 100.82667 10012   18     518  1042   524
432   12 100.82667 10012   21   17290 20522  3232
433   12 100.82667 10012   40    1683  1602   -81
434   12 100.82667 10012   48     915  2087  1172
435   12 100.82667 10012   50   10215 13858  3643
436   12 100.82667 10012   52   10544  7296 -3248
437   12 100.82667 10012   53    3195  3860   665
438   12 100.82667 10012   54    1439  1347   -92
439   12 100.82667 10012   81    9270 10882  1612
440   12 100.82667 10012  101     585   721   136
441   12 100.82667 10012  102    1422  1682   260
442   12 100.82667 10012  103    5653  6176   523
443   12 100.82667 10012  108    2433  2972   539
444   12 100.82667 10012  118    1991  3106  1115
445   12 100.82667 10012  147    1452  1901   449
446   12 100.82667 10012  803    4966  5992  1026
447   12 100.82667 10012  805    5264  4878  -386
448   12 100.82667 10012  806    5020  4725  -295
449   12 100.82667 10012  807   10761 13386  2625
450   12 100.82667 10012  808   10749 16156  5407
451   12 100.82667 10012  809    3746  2156 -1590
452   12 100.82667 10012  812   13418 15404  1986
453   12 100.82667 10012  814    5552  5483   -69
454   12 100.82667 10012  815    2929  3623   694
455   12 100.82667 10012  816    3282  3379    97
456   12 100.82667 10012  822   29498 29991   493
457   13 100.42667 10103    4    4474  5380   906
458   13 100.42667 10103    5    2934  2947    13
459   13 100.42667 10103    6    4737  5499   762
460   13 100.42667 10103    7    3851  4830   979
461   13 100.42667 10103    8    3866  4443   577
462   13 100.42667 10103    9    3053  3296   243
463   13 100.42667 10103   11    1217  1417   200
464   13 100.42667 10103   12    3317  2860  -457
465   13 100.42667 10103   13    4363  4045  -318
466   13 100.42667 10103   15      94   128    34
467   13 100.42667 10103   16     494   523    29
468   13 100.42667 10103   17    3792  4212   420
469   13 100.42667 10103   18     132   178    46
470   13 100.42667 10103   21    3659  4180   521
471   13 100.42667 10103   40     416   280  -136
472   13 100.42667 10103   48     273   368    95
473   13 100.42667 10103   50    2584  3491   907
474   13 100.42667 10103   52    2421  2536   115
475   13 100.42667 10103   53     816   820     4
476   13 100.42667 10103   54     361   429    68
477   13 100.42667 10103   81    2106  2252   146
478   13 100.42667 10103  101     149   141    -8
479   13 100.42667 10103  102     343   390    47
480   13 100.42667 10103  103    1454  1559   105
481   13 100.42667 10103  108     622   609   -13
482   13 100.42667 10103  118     469   499    30
483   13 100.42667 10103  147     355   469   114
484   13 100.42667 10103  803    1204  1244    40
485   13 100.42667 10103  805    1370  1467    97
486   13 100.42667 10103  806    1229  1316    87
487   13 100.42667 10103  807    2691  2946   255
488   13 100.42667 10103  808    2967  4401  1434
489   13 100.42667 10103  809     949   713  -236
490   13 100.42667 10103  810     867   968   101
491   13 100.42667 10103  812    3261  3063  -198
492   13 100.42667 10103  814    1327  1563   236
493   13 100.42667 10103  815     687   673   -14
494   13 100.42667 10103  816    1004  1095    91
495   13 100.42667 10103  822    7583  7722   139
496   14 101.54000 10106    4    8569  9780  1211
497   14 101.54000 10106    5    5978  6252   274
498   14 101.54000 10106    6    9519 11465  1946
499   14 101.54000 10106    7    7788 10017  2229
500   14 101.54000 10106    8    7796  9531  1735
501   14 101.54000 10106    9    6325  6811   486
502   14 101.54000 10106   11    2462  2820   358
503   14 101.54000 10106   12    6788  6147  -641
504   14 101.54000 10106   13    8479  8146  -333
505   14 101.54000 10106   15     221   298    77
506   14 101.54000 10106   16     995  1175   180
507   14 101.54000 10106   17    7493  7718   225
508   14 101.54000 10106   18     266   431   165
509   14 101.54000 10106   21    8714  8814   100
510   14 101.54000 10106   40     762   414  -348
511   14 101.54000 10106   48     513   822   309
512   14 101.54000 10106   50    5216  7225  2009
513   14 101.54000 10106   52    5005  5411   406
514   14 101.54000 10106   53    1664  1711    47
515   14 101.54000 10106   54     739   684   -55
516   14 101.54000 10106   81    4097  3927  -170
517   14 101.54000 10106  101     295   280   -15
518   14 101.54000 10106  102     719   833   114
519   14 101.54000 10106  103    2907  3127   220
520   14 101.54000 10106  108    1274  1218   -56
521   14 101.54000 10106  118     963  1005    42
522   14 101.54000 10106  147     757  1016   259
523   14 101.54000 10106  803    2439  2531    92
524   14 101.54000 10106  805    2756  2986   230
525   14 101.54000 10106  806    2472  2636   164
526   14 101.54000 10106  807    5474  5886   412
527   14 101.54000 10106  808    6086  7825  1739
528   14 101.54000 10106  809    1847  1209  -638
529   14 101.54000 10106  810    1835  1978   143
530   14 101.54000 10106  812    6658  6160  -498
531   14 101.54000 10106  814    2654  3131   477
532   14 101.54000 10106  815    1396  1414    18
533   14 101.54000 10106  816    1862  2132   270
534   14 101.54000 10106  822   15169 14648  -521
535   15 103.08333 10109    4   12823 15241  2418
536   15 103.08333 10109    5    9010 10026  1016
537   15 103.08333 10109    6   14562 17547  2985
538   15 103.08333 10109    7   11713 15592  3879
539   15 103.08333 10109    8   11631 15058  3427
540   15 103.08333 10109    9    9524 10428   904
541   15 103.08333 10109   11    3735  4166   431
542   15 103.08333 10109   12   10326  9561  -765
543   15 103.08333 10109   13   12687 12691     4
544   15 103.08333 10109   15     330   502   172
545   15 103.08333 10109   16    1484  1799   315
546   15 103.08333 10109   17   11546 13388  1842
547   15 103.08333 10109   18     406   688   282
548   15 103.08333 10109   21   12035 12550   515
549   15 103.08333 10109   40    1167   813  -354
550   15 103.08333 10109   48     790  1191   401
551   15 103.08333 10109   50    7829 10595  2766
552   15 103.08333 10109   52    7692  8373   681
553   15 103.08333 10109   53    2529  2613    84
554   15 103.08333 10109   54    1101  1105     4
555   15 103.08333 10109   81    6306  6178  -128
556   15 103.08333 10109  101     445   425   -20
557   15 103.08333 10109  102    1085  1272   187
558   15 103.08333 10109  103    4409  4711   302
559   15 103.08333 10109  108    1928  1812  -116
560   15 103.08333 10109  118    1473  1739   266
561   15 103.08333 10109  147    1098  1506   408
562   15 103.08333 10109  803    3669  3899   230
563   15 103.08333 10109  805    4113  4488   375
564   15 103.08333 10109  806    3730  4037   307
565   15 103.08333 10109  807    8397  9276   879
566   15 103.08333 10109  808    9281 11447  2166
567   15 103.08333 10109  809    2748  1216 -1532
568   15 103.08333 10109  810    2804  2911   107
569   15 103.08333 10109  812   10178  9364  -814
570   15 103.08333 10109  814    3928  4658   730
571   15 103.08333 10109  815    2104  2118    14
572   15 103.08333 10109  816    2697  2977   280
573   15 103.08333 10109  822   23086 23266   180
574   16 102.68333 10112    4   17983 21092  3109
575   16 102.68333 10112    5   12714 14126  1412
576   16 102.68333 10112    6   19688 24158  4470
577   16 102.68333 10112    7   15755 21564  5809
578   16 102.68333 10112    8   15425 20858  5433
579   16 102.68333 10112    9   13140 14749  1609
580   16 102.68333 10112   11    5075  5576   501
581   16 102.68333 10112   12   14271 13729  -542
582   16 102.68333 10112   13   17141 19191  2050
583   16 102.68333 10112   15     458   675   217
584   16 102.68333 10112   16    1986  2560   574
585   16 102.68333 10112   17   16059 20214  4155
586   16 102.68333 10112   18     553  1295   742
587   16 102.68333 10112   21   15781 16391   610
588   16 102.68333 10112   40    1614  1577   -37
589   16 102.68333 10112   48     992  2258  1266
590   16 102.68333 10112   50   10570 13836  3266
591   16 102.68333 10112   52   10552 12573  2021
592   16 102.68333 10112   53    3301  3527   226
593   16 102.68333 10112   54    1457  1460     3
594   16 102.68333 10112   81    8444  8431   -13
595   16 102.68333 10112  101     594   568   -26
596   16 102.68333 10112  102    1458  1756   298
597   16 102.68333 10112  103    5970  6689   719
598   16 102.68333 10112  108    2557  2734   177
599   16 102.68333 10112  118    1959  2396   437
600   16 102.68333 10112  147    1508  2011   503
601   16 102.68333 10112  803    5015  5571   556
602   16 102.68333 10112  805    5530  6428   898
603   16 102.68333 10112  806    4976  5456   480
604   16 102.68333 10112  807   11228 12184   956
605   16 102.68333 10112  808   12685 15568  2883
606   16 102.68333 10112  809    3856  1852 -2004
607   16 102.68333 10112  810    4263  4565   302
608   16 102.68333 10112  812   14073 13493  -580
609   16 102.68333 10112  814    5244  6319  1075
610   16 102.68333 10112  815    2815  3101   286
611   16 102.68333 10112  816    3612  4233   621
612   16 102.68333 10112  822   30848 31192   344

> dput(bank_incst)
structure(list(Col1 = c(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4,
4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4,
4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5,
5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5,
5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7,
7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7,
7, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9,
9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9,
9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10,
10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10,
10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10,
10, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11,
11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11,
11, 11, 11, 11, 11, 11, 11, 12, 12, 12, 12, 12, 12, 12, 12, 12,
12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12,
12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 13, 13, 13,
13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13,
13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13,
13, 13, 13, 13, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14,
14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14,
14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 15, 15, 15, 15, 15,
15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15,
15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15,
15, 15, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16,
16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16,
16, 16, 16, 16, 16, 16, 16, 16, 16), cpi = c(96.6633333333333,
96.6633333333333, 96.6633333333333, 96.6633333333333, 96.6633333333333,
96.6633333333333, 96.6633333333333, 96.6633333333333, 96.6633333333333,
96.6633333333333, 96.6633333333333, 96.6633333333333, 96.6633333333333,
96.6633333333333, 96.6633333333333, 96.6633333333333, 96.6633333333333,
96.6633333333333, 96.6633333333333, 96.6633333333333, 96.6633333333333,
96.6633333333333, 96.6633333333333, 96.6633333333333, 96.6633333333333,
96.6633333333333, 96.6633333333333, 96.6633333333333, 96.6633333333333,
96.6633333333333, 96.6633333333333, 96.6633333333333, 96.6633333333333,
96.6633333333333, 96.6633333333333, 96.6633333333333, 96.6633333333333,
96.6633333333333, 97.2133333333333, 97.2133333333333, 97.2133333333333,
97.2133333333333, 97.2133333333333, 97.2133333333333, 97.2133333333333,
97.2133333333333, 97.2133333333333, 97.2133333333333, 97.2133333333333,
97.2133333333333, 97.2133333333333, 97.2133333333333, 97.2133333333333,
97.2133333333333, 97.2133333333333, 97.2133333333333, 97.2133333333333,
97.2133333333333, 97.2133333333333, 97.2133333333333, 97.2133333333333,
97.2133333333333, 97.2133333333333, 97.2133333333333, 97.2133333333333,
97.2133333333333, 97.2133333333333, 97.2133333333333, 97.2133333333333,
97.2133333333333, 97.2133333333333, 97.2133333333333, 97.2133333333333,
97.2133333333333, 97.2133333333333, 97.2133333333333, 98.4333333333333,
98.4333333333333, 98.4333333333333, 98.4333333333333, 98.4333333333333,
98.4333333333333, 98.4333333333333, 98.4333333333333, 98.4333333333333,
98.4333333333333, 98.4333333333333, 98.4333333333333, 98.4333333333333,
98.4333333333333, 98.4333333333333, 98.4333333333333, 98.4333333333333,
98.4333333333333, 98.4333333333333, 98.4333333333333, 98.4333333333333,
98.4333333333333, 98.4333333333333, 98.4333333333333, 98.4333333333333,
98.4333333333333, 98.4333333333333, 98.4333333333333, 98.4333333333333,
98.4333333333333, 98.4333333333333, 98.4333333333333, 98.4333333333333,
98.4333333333333, 98.4333333333333, 98.4333333333333, 98.4333333333333,
98.4333333333333, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31,
98.31, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31,
98.31, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31,
98.31, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31, 98.31,
98.31, 98.31, 98.31, 98.31, 97.9033333333333, 97.9033333333333,
97.9033333333333, 97.9033333333333, 97.9033333333333, 97.9033333333333,
97.9033333333333, 97.9033333333333, 97.9033333333333, 97.9033333333333,
97.9033333333333, 97.9033333333333, 97.9033333333333, 97.9033333333333,
97.9033333333333, 97.9033333333333, 97.9033333333333, 97.9033333333333,
97.9033333333333, 97.9033333333333, 97.9033333333333, 97.9033333333333,
97.9033333333333, 97.9033333333333, 97.9033333333333, 97.9033333333333,
97.9033333333333, 97.9033333333333, 97.9033333333333, 97.9033333333333,
97.9033333333333, 97.9033333333333, 97.9033333333333, 97.9033333333333,
97.9033333333333, 97.9033333333333, 97.9033333333333, 97.9033333333333,
98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28,
98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28,
98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28,
98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28, 98.28,
98.28, 98.28, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8,
98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8,
98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8,
98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 98.8, 99.3966666666667,
99.3966666666667, 99.3966666666667, 99.3966666666667, 99.3966666666667,
99.3966666666667, 99.3966666666667, 99.3966666666667, 99.3966666666667,
99.3966666666667, 99.3966666666667, 99.3966666666667, 99.3966666666667,
99.3966666666667, 99.3966666666667, 99.3966666666667, 99.3966666666667,
99.3966666666667, 99.3966666666667, 99.3966666666667, 99.3966666666667,
99.3966666666667, 99.3966666666667, 99.3966666666667, 99.3966666666667,
99.3966666666667, 99.3966666666667, 99.3966666666667, 99.3966666666667,
99.3966666666667, 99.3966666666667, 99.3966666666667, 99.3966666666667,
99.3966666666667, 99.3966666666667, 99.3966666666667, 99.3966666666667,
99.3966666666667, 99.1533333333333, 99.1533333333333, 99.1533333333333,
99.1533333333333, 99.1533333333333, 99.1533333333333, 99.1533333333333,
99.1533333333333, 99.1533333333333, 99.1533333333333, 99.1533333333333,
99.1533333333333, 99.1533333333333, 99.1533333333333, 99.1533333333333,
99.1533333333333, 99.1533333333333, 99.1533333333333, 99.1533333333333,
99.1533333333333, 99.1533333333333, 99.1533333333333, 99.1533333333333,
99.1533333333333, 99.1533333333333, 99.1533333333333, 99.1533333333333,
99.1533333333333, 99.1533333333333, 99.1533333333333, 99.1533333333333,
99.1533333333333, 99.1533333333333, 99.1533333333333, 99.1533333333333,
99.1533333333333, 99.1533333333333, 99.1533333333333, 99.8933333333333,
99.8933333333333, 99.8933333333333, 99.8933333333333, 99.8933333333333,
99.8933333333333, 99.8933333333333, 99.8933333333333, 99.8933333333333,
99.8933333333333, 99.8933333333333, 99.8933333333333, 99.8933333333333,
99.8933333333333, 99.8933333333333, 99.8933333333333, 99.8933333333333,
99.8933333333333, 99.8933333333333, 99.8933333333333, 99.8933333333333,
99.8933333333333, 99.8933333333333, 99.8933333333333, 99.8933333333333,
99.8933333333333, 99.8933333333333, 99.8933333333333, 99.8933333333333,
99.8933333333333, 99.8933333333333, 99.8933333333333, 99.8933333333333,
99.8933333333333, 99.8933333333333, 99.8933333333333, 99.8933333333333,
99.8933333333333, 100.133333333333, 100.133333333333, 100.133333333333,
100.133333333333, 100.133333333333, 100.133333333333, 100.133333333333,
100.133333333333, 100.133333333333, 100.133333333333, 100.133333333333,
100.133333333333, 100.133333333333, 100.133333333333, 100.133333333333,
100.133333333333, 100.133333333333, 100.133333333333, 100.133333333333,
100.133333333333, 100.133333333333, 100.133333333333, 100.133333333333,
100.133333333333, 100.133333333333, 100.133333333333, 100.133333333333,
100.133333333333, 100.133333333333, 100.133333333333, 100.133333333333,
100.133333333333, 100.133333333333, 100.133333333333, 100.133333333333,
100.133333333333, 100.133333333333, 100.133333333333, 100.826666666667,
100.826666666667, 100.826666666667, 100.826666666667, 100.826666666667,
100.826666666667, 100.826666666667, 100.826666666667, 100.826666666667,
100.826666666667, 100.826666666667, 100.826666666667, 100.826666666667,
100.826666666667, 100.826666666667, 100.826666666667, 100.826666666667,
100.826666666667, 100.826666666667, 100.826666666667, 100.826666666667,
100.826666666667, 100.826666666667, 100.826666666667, 100.826666666667,
100.826666666667, 100.826666666667, 100.826666666667, 100.826666666667,
100.826666666667, 100.826666666667, 100.826666666667, 100.826666666667,
100.826666666667, 100.826666666667, 100.826666666667, 100.826666666667,
100.826666666667, 100.426666666667, 100.426666666667, 100.426666666667,
100.426666666667, 100.426666666667, 100.426666666667, 100.426666666667,
100.426666666667, 100.426666666667, 100.426666666667, 100.426666666667,
100.426666666667, 100.426666666667, 100.426666666667, 100.426666666667,
100.426666666667, 100.426666666667, 100.426666666667, 100.426666666667,
100.426666666667, 100.426666666667, 100.426666666667, 100.426666666667,
100.426666666667, 100.426666666667, 100.426666666667, 100.426666666667,
100.426666666667, 100.426666666667, 100.426666666667, 100.426666666667,
100.426666666667, 100.426666666667, 100.426666666667, 100.426666666667,
100.426666666667, 100.426666666667, 100.426666666667, 100.426666666667,
101.54, 101.54, 101.54, 101.54, 101.54, 101.54, 101.54, 101.54,
101.54, 101.54, 101.54, 101.54, 101.54, 101.54, 101.54, 101.54,
101.54, 101.54, 101.54, 101.54, 101.54, 101.54, 101.54, 101.54,
101.54, 101.54, 101.54, 101.54, 101.54, 101.54, 101.54, 101.54,
101.54, 101.54, 101.54, 101.54, 101.54, 101.54, 101.54,
103.083333333333,
103.083333333333, 103.083333333333, 103.083333333333, 103.083333333333,
103.083333333333, 103.083333333333, 103.083333333333, 103.083333333333,
103.083333333333, 103.083333333333, 103.083333333333, 103.083333333333,
103.083333333333, 103.083333333333, 103.083333333333, 103.083333333333,
103.083333333333, 103.083333333333, 103.083333333333, 103.083333333333,
103.083333333333, 103.083333333333, 103.083333333333, 103.083333333333,
103.083333333333, 103.083333333333, 103.083333333333, 103.083333333333,
103.083333333333, 103.083333333333, 103.083333333333, 103.083333333333,
103.083333333333, 103.083333333333, 103.083333333333, 103.083333333333,
103.083333333333, 103.083333333333, 102.683333333333, 102.683333333333,
102.683333333333, 102.683333333333, 102.683333333333, 102.683333333333,
102.683333333333, 102.683333333333, 102.683333333333, 102.683333333333,
102.683333333333, 102.683333333333, 102.683333333333, 102.683333333333,
102.683333333333, 102.683333333333, 102.683333333333, 102.683333333333,
102.683333333333, 102.683333333333, 102.683333333333, 102.683333333333,
102.683333333333, 102.683333333333, 102.683333333333, 102.683333333333,
102.683333333333, 102.683333333333, 102.683333333333, 102.683333333333,
102.683333333333, 102.683333333333, 102.683333333333, 102.683333333333,
102.683333333333, 102.683333333333, 102.683333333333, 102.683333333333,
102.683333333333), date = c(9803, 9803, 9803, 9803, 9803, 9803,
9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803,
9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803,
9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803, 9803, 9806,
9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806,
9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806,
9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806, 9806,
9806, 9806, 9806, 9806, 9809, 9809, 9809, 9809, 9809, 9809, 9809,
9809, 9809, 9809, 9809, 9809, 9809, 9809, 9809, 9809, 9809, 9809,
9809, 9809, 9809, 9809, 9809, 9809, 9809, 9809, 9809, 9809, 9809,
9809, 9809, 9809, 9809, 9809, 9809, 9809, 9809, 9809, 9812, 9812,
9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812,
9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812,
9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812, 9812,
9812, 9812, 9812, 9903, 9903, 9903, 9903, 9903, 9903, 9903, 9903,
9903, 9903, 9903, 9903, 9903, 9903, 9903, 9903, 9903, 9903, 9903,
9903, 9903, 9903, 9903, 9903, 9903, 9903, 9903, 9903, 9903, 9903,
9903, 9903, 9903, 9903, 9903, 9903, 9903, 9903, 9906, 9906, 9906,
9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906,
9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906,
9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906, 9906,
9906, 9906, 9909, 9909, 9909, 9909, 9909, 9909, 9909, 9909, 9909,
9909, 9909, 9909, 9909, 9909, 9909, 9909, 9909, 9909, 9909, 9909,
9909, 9909, 9909, 9909, 9909, 9909, 9909, 9909, 9909, 9909, 9909,
9909, 9909, 9909, 9909, 9909, 9909, 9909, 9912, 9912, 9912, 9912,
9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912,
9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912,
9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912, 9912,
9912, 10003, 10003, 10003, 10003, 10003, 10003, 10003, 10003,
10003, 10003, 10003, 10003, 10003, 10003, 10003, 10003, 10003,
10003, 10003, 10003, 10003, 10003, 10003, 10003, 10003, 10003,
10003, 10003, 10003, 10003, 10003, 10003, 10003, 10003, 10003,
10003, 10003, 10003, 10006, 10006, 10006, 10006, 10006, 10006,
10006, 10006, 10006, 10006, 10006, 10006, 10006, 10006, 10006,
10006, 10006, 10006, 10006, 10006, 10006, 10006, 10006, 10006,
10006, 10006, 10006, 10006, 10006, 10006, 10006, 10006, 10006,
10006, 10006, 10006, 10006, 10006, 10009, 10009, 10009, 10009,
10009, 10009, 10009, 10009, 10009, 10009, 10009, 10009, 10009,
10009, 10009, 10009, 10009, 10009, 10009, 10009, 10009, 10009,
10009, 10009, 10009, 10009, 10009, 10009, 10009, 10009, 10009,
10009, 10009, 10009, 10009, 10009, 10009, 10009, 10012, 10012,
10012, 10012, 10012, 10012, 10012, 10012, 10012, 10012, 10012,
10012, 10012, 10012, 10012, 10012, 10012, 10012, 10012, 10012,
10012, 10012, 10012, 10012, 10012, 10012, 10012, 10012, 10012,
10012, 10012, 10012, 10012, 10012, 10012, 10012, 10012, 10012,
10103, 10103, 10103, 10103, 10103, 10103, 10103, 10103, 10103,
10103, 10103, 10103, 10103, 10103, 10103, 10103, 10103, 10103,
10103, 10103, 10103, 10103, 10103, 10103, 10103, 10103, 10103,
10103, 10103, 10103, 10103, 10103, 10103, 10103, 10103, 10103,
10103, 10103, 10103, 10106, 10106, 10106, 10106, 10106, 10106,
10106, 10106, 10106, 10106, 10106, 10106, 10106, 10106, 10106,
10106, 10106, 10106, 10106, 10106, 10106, 10106, 10106, 10106,
10106, 10106, 10106, 10106, 10106, 10106, 10106, 10106, 10106,
10106, 10106, 10106, 10106, 10106, 10106, 10109, 10109, 10109,
10109, 10109, 10109, 10109, 10109, 10109, 10109, 10109, 10109,
10109, 10109, 10109, 10109, 10109, 10109, 10109, 10109, 10109,
10109, 10109, 10109, 10109, 10109, 10109, 10109, 10109, 10109,
10109, 10109, 10109, 10109, 10109, 10109, 10109, 10109, 10109,
10112, 10112, 10112, 10112, 10112, 10112, 10112, 10112, 10112,
10112, 10112, 10112, 10112, 10112, 10112, 10112, 10112, 10112,
10112, 10112, 10112, 10112, 10112, 10112, 10112, 10112, 10112,
10112, 10112, 10112, 10112, 10112, 10112, 10112, 10112, 10112,
10112, 10112, 10112), name = c(4, 5, 6, 7, 8, 9, 10, 11, 12,
13, 15, 16, 17, 18, 40, 48, 50, 52, 53, 54, 101, 102, 103, 108,
118, 147, 803, 805, 806, 807, 808, 809, 812, 814, 815, 816, 822,
825, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 40, 48,
50, 52, 53, 54, 101, 102, 103, 108, 118, 147, 803, 805, 806,
807, 808, 809, 812, 814, 815, 816, 822, 825, 4, 5, 6, 7, 8, 9,
11, 12, 13, 15, 16, 17, 18, 21, 40, 48, 50, 52, 53, 54, 101,
102, 103, 108, 118, 147, 803, 805, 806, 807, 808, 809, 812, 814,
815, 816, 822, 825, 4, 5, 6, 7, 8, 9, 11, 12, 13, 15, 16, 17,
18, 21, 40, 48, 50, 52, 53, 54, 101, 102, 103, 108, 118, 147,
803, 805, 806, 807, 808, 809, 812, 814, 815, 816, 822, 825, 4,
5, 6, 7, 8, 9, 11, 12, 13, 15, 16, 17, 18, 21, 40, 48, 50, 52,
53, 54, 101, 102, 103, 108, 118, 147, 803, 805, 806, 807, 808,
809, 812, 814, 815, 816, 822, 825, 4, 5, 6, 7, 8, 9, 11, 12,
13, 15, 16, 17, 18, 21, 40, 48, 50, 52, 53, 54, 81, 101, 102,
103, 108, 118, 147, 803, 805, 806, 807, 808, 809, 812, 814, 815,
816, 822, 4, 5, 6, 7, 8, 9, 11, 12, 13, 15, 16, 17, 18, 21, 40,
48, 50, 52, 53, 54, 81, 101, 102, 103, 108, 118, 147, 803, 805,
806, 807, 808, 809, 812, 814, 815, 816, 822, 4, 5, 6, 7, 8, 9,
11, 12, 13, 15, 16, 17, 18, 21, 40, 48, 50, 52, 53, 54, 81, 101,
102, 103, 108, 118, 147, 803, 805, 806, 807, 808, 809, 812, 814,
815, 816, 822, 4, 5, 6, 7, 8, 9, 11, 12, 13, 15, 16, 17, 18,
21, 40, 48, 50, 52, 53, 54, 81, 101, 102, 103, 108, 118, 147,
803, 805, 806, 807, 808, 809, 812, 814, 815, 816, 822, 4, 5,
6, 7, 8, 9, 11, 12, 13, 15, 16, 17, 18, 21, 40, 48, 50, 52, 53,
54, 81, 101, 102, 103, 108, 118, 147, 803, 805, 806, 807, 808,
809, 812, 814, 815, 816, 822, 4, 5, 6, 7, 8, 9, 11, 12, 13, 15,
16, 17, 18, 21, 40, 48, 50, 52, 53, 54, 81, 101, 102, 103, 108,
118, 147, 803, 805, 806, 807, 808, 809, 812, 814, 815, 816, 822,
4, 5, 6, 7, 8, 9, 11, 12, 13, 15, 16, 17, 18, 21, 40, 48, 50,
52, 53, 54, 81, 101, 102, 103, 108, 118, 147, 803, 805, 806,
807, 808, 809, 812, 814, 815, 816, 822, 4, 5, 6, 7, 8, 9, 11,
12, 13, 15, 16, 17, 18, 21, 40, 48, 50, 52, 53, 54, 81, 101,
102, 103, 108, 118, 147, 803, 805, 806, 807, 808, 809, 810, 812,
814, 815, 816, 822, 4, 5, 6, 7, 8, 9, 11, 12, 13, 15, 16, 17,
18, 21, 40, 48, 50, 52, 53, 54, 81, 101, 102, 103, 108, 118,
147, 803, 805, 806, 807, 808, 809, 810, 812, 814, 815, 816, 822,
4, 5, 6, 7, 8, 9, 11, 12, 13, 15, 16, 17, 18, 21, 40, 48, 50,
52, 53, 54, 81, 101, 102, 103, 108, 118, 147, 803, 805, 806,
807, 808, 809, 810, 812, 814, 815, 816, 822, 4, 5, 6, 7, 8, 9,
11, 12, 13, 15, 16, 17, 18, 21, 40, 48, 50, 52, 53, 54, 81, 101,
102, 103, 108, 118, 147, 803, 805, 806, 807, 808, 809, 810, 812,
814, 815, 816, 822), expense = c(3675, 2776, 4422, 3394, 3429,
2795, 949, 1050, 2993, 3439, 109, 442, 3571, 96, 362, 233, 2413,
2609, 716, 387, 151, 301, 1255, 629, 447, 330, 1145, 932, 1049,
2068, 2014, 1461, 2695, 1096, 813, 599, 6465, 422, 7943, 5784,
8892, 6819, 6789, 5616, 1985, 2124, 5925, 6799, 238, 823, 7057,
188, 721, 513, 4687, 4727, 1343, 785, 296, 600, 2460, 1251, 906,
620, 2309, 1826, 2120, 4045, 3997, 2429, 5358, 2228, 1543, 1219,
12924, 821, 11771, 8707, 13539, 10165, 10195, 8467, 3224, 8894,
10431, 356, 1270, 10778, 299, 5079, 1114, 758, 7012, 7585, 2068,
1170, 439, 898, 3648, 1790, 1347, 921, 3392, 2880, 3208, 6201,
6137, 3402, 8091, 3409, 2258, 1855, 19137, 1206, 16717, 12374,
18290, 13811, 14132, 11645, 5409, 12300, 14388, 494, 1728, 14585,
483, 9143, 1630, 1020, 9451, 12254, 2678, 1618, 583, 1249, 4914,
2352, 1795, 1281, 4534, 4027, 4340, 8941, 8275, 4332, 11494,
4722, 3086, 2493, 27540, 1649, 3963, 2743, 4584, 3364, 3476,
2910, 1060, 2921, 3486, 104, 465, 3845, 101, 3759, 473, 236,
2354, 2774, 659, 382, 137, 303, 1209, 528, 380, 296, 1078, 1095,
1076, 2276, 2191, 898, 2783, 1263, 713, 608, 6861, 1142, 8039,
5826, 9086, 6890, 7069, 5992, 2147, 6024, 7109, 221, 918, 10807,
206, 6978, 818, 484, 4707, 5313, 1360, 751, 1566, 283, 639, 2462,
1084, 899, 624, 2172, 2342, 2234, 4529, 4456, 1796, 5549, 2565,
1491, 1306, 13949, 12256, 8705, 13737, 10510, 10670, 8933, 3283,
9420, 10794, 327, 1381, 14481, 321, 10990, 1325, 770, 7159, 8045,
2044, 1123, 3813, 429, 974, 3709, 1716, 1361, 980, 3316, 3607,
3371, 7047, 6855, 2778, 8705, 3994, 2208, 1958, 21033, 16989,
12785, 18558, 14206, 14475, 12497, 4559, 13586, 14807, 471, 1829,
18889, 491, 15841, 1749, 996, 9738, 10977, 2760, 1493, 6784,
689, 1334, 5042, 2406, 1840, 1348, 4644, 4951, 4581, 9671, 9479,
3767, 12214, 5403, 2956, 2861, 28824, 3212, 2839, 4659, 3665,
3680, 3041, 1116, 3210, 4029, 102, 465, 3680, 119, 4031, 338,
249, 2553, 2782, 819, 354, 2238, 146, 335, 1357, 536, 478, 354,
1191, 1275, 1213, 2462, 2425, 857, 3092, 1431, 710, 892, 7295,
7857, 5817, 9325, 7419, 7542, 6445, 2379, 6510, 7851, 217, 877,
7929, 248, 8208, 882, 425, 5055, 5424, 1606, 712, 4343, 280,
695, 2736, 1055, 983, 706, 2339, 2524, 2426, 5177, 4959, 1801,
6359, 2860, 1414, 1712, 14879, 12432, 8951, 14231, 11669, 11574,
9496, 5001, 9908, 11827, 346, 1357, 12065, 380, 12539, 1203,
655, 7617, 7936, 2513, 1066, 6796, 432, 1051, 4148, 1741, 1508,
1089, 3570, 3850, 3677, 8055, 7761, 2776, 9743, 4221, 2148, 2505,
22141, 18103, 12615, 19393, 15618, 15583, 12809, 6351, 13896,
16372, 472, 1847, 15933, 518, 17290, 1683, 915, 10215, 10544,
3195, 1439, 9270, 585, 1422, 5653, 2433, 1991, 1452, 4966, 5264,
5020, 10761, 10749, 3746, 13418, 5552, 2929, 3282, 29498, 4474,
2934, 4737, 3851, 3866, 3053, 1217, 3317, 4363, 94, 494, 3792,
132, 3659, 416, 273, 2584, 2421, 816, 361, 2106, 149, 343, 1454,
622, 469, 355, 1204, 1370, 1229, 2691, 2967, 949, 867, 3261,
1327, 687, 1004, 7583, 8569, 5978, 9519, 7788, 7796, 6325, 2462,
6788, 8479, 221, 995, 7493, 266, 8714, 762, 513, 5216, 5005,
1664, 739, 4097, 295, 719, 2907, 1274, 963, 757, 2439, 2756,
2472, 5474, 6086, 1847, 1835, 6658, 2654, 1396, 1862, 15169,
12823, 9010, 14562, 11713, 11631, 9524, 3735, 10326, 12687, 330,
1484, 11546, 406, 12035, 1167, 790, 7829, 7692, 2529, 1101, 6306,
445, 1085, 4409, 1928, 1473, 1098, 3669, 4113, 3730, 8397, 9281,
2748, 2804, 10178, 3928, 2104, 2697, 23086, 17983, 12714, 19688,
15755, 15425, 13140, 5075, 14271, 17141, 458, 1986, 16059, 553,
15781, 1614, 992, 10570, 10552, 3301, 1457, 8444, 594, 1458,
5970, 2557, 1959, 1508, 5015, 5530, 4976, 11228, 12685, 3856,
4263, 14073, 5244, 2815, 3612, 30848), cost = c(5919, 3596, 6365,
5120, 4983, 4232, 1582, 1424, 3825, 4215, 141, 473, 6330, 96,
229, 276, 3277, 4040, 1117, 588, 174, 365, 1796, 789, 481, 438,
1723, 1122, 1260, 2725, 2566, 2921, 4442, 1588, 1432, 799, 8078,
844, 10038, 6930, 12307, 9797, 10160, 8129, 3116, 2945, 7555,
7087, 317, 1008, 11710, 188, 500, 568, 6315, 7613, 1857, 1302,
316, 720, 3331, 1593, 967, 811, 3120, 2185, 2424, 5421, 4962,
4831, 8494, 3010, 6888, 1484, 15518, 1253, 15527, 10122, 17281,
14968, 15914, 12385, 4194, 11265, 10594, 445, 1485, 16421, 399,
6559, 864, 879, 9433, 16908, 2742, 2018, 458, 1095, 4889, 2222,
1437, 1218, 4486, 3350, 3549, 8399, 7518, 6591, 11746, 4339,
7808, 2728, 22529, 1705, 21073, 14139, 23519, 24432, 24776, 16930,
6656, 16305, 13958, 524, 1946, 20933, 683, 9600, 1569, 1227,
13107, 21795, 3027, 2754, 519, 1542, 6673, 2880, 3023, 1709,
5835, 5271, 4695, 11812, 10752, 7914, 16089, 5657, 9563, 3190,
31907, 2255, 4094, 3002, 5495, 5210, 4891, 3256, 1224, 3200,
3216, 138, 495, 4232, 101, 3908, 450, 236, 3307, 3273, 906, 602,
131, 345, 1657, 633, 410, 437, 1387, 1069, 1091, 2823, 3033,
1159, 3421, 1503, 834, 323, 6715, 1191, 8435, 6451, 11482, 9624,
9538, 7878, 2389, 6329, 6657, 314, 1037, 10667, 536, 7440, 601,
484, 7003, 6104, 1782, 913, 1486, 245, 743, 3420, 1289, 959,
919, 2724, 1955, 2259, 5601, 6104, 1777, 5979, 3104, 1797, 1320,
13554, 12991, 9608, 17230, 14504, 14596, 11607, 3754, 9761, 9775,
409, 1608, 16108, 771, 11630, 1077, 770, 10201, 9351, 2874, 1308,
3628, 389, 1217, 5135, 2046, 1451, 1367, 3835, 3083, 3368, 8622,
9326, 2374, 9463, 4833, 2668, 2187, 20965, 17304, 14815, 23450,
19635, 21033, 17269, 5152, 15573, 14662, 554, 2137, 21017, 1031,
16766, 1432, 992, 13855, 11330, 3711, 1678, 6525, 615, 1754,
6774, 2781, 1960, 1821, 5481, 4388, 4406, 12276, 12837, 3780,
13620, 6392, 3525, 2873, 29841, 6226, 2860, 5284, 4995, 4571,
3283, 1225, 2814, 3876, 112, 1340, 4044, 404, 3829, 454, 249,
3611, 2876, 830, 272, 1994, 136, 403, 1131, 575, 558, 489, 1292,
953, 880, 2698, 3180, 198, 3667, 1431, 1114, 921, 7477, 11429,
5926, 10982, 9888, 9259, 7111, 2567, 5748, 7844, 257, 1751, 8591,
551, 10409, 982, 722, 7363, 5368, 1648, 620, 4731, 264, 803,
2508, 1589, 1145, 905, 2425, 2061, 1983, 5404, 6688, 669, 7475,
2790, 1849, 1721, 13594, 17063, 9109, 17641, 14897, 14127, 10646,
5257, 9292, 11863, 447, 2238, 12331, 840, 15140, 1422, 979, 10717,
4672, 2837, 984, 7417, 451, 1218, 4019, 2313, 2365, 1412, 3896,
3174, 3196, 8612, 10075, 1483, 11400, 4152, 2803, 2598, 22762,
23146, 14212, 24567, 20786, 20012, 16034, 6678, 15082, 16898,
642, 2746, 18385, 1042, 20522, 1602, 2087, 13858, 7296, 3860,
1347, 10882, 721, 1682, 6176, 2972, 3106, 1901, 5992, 4878, 4725,
13386, 16156, 2156, 15404, 5483, 3623, 3379, 29991, 5380, 2947,
5499, 4830, 4443, 3296, 1417, 2860, 4045, 128, 523, 4212, 178,
4180, 280, 368, 3491, 2536, 820, 429, 2252, 141, 390, 1559, 609,
499, 469, 1244, 1467, 1316, 2946, 4401, 713, 968, 3063, 1563,
673, 1095, 7722, 9780, 6252, 11465, 10017, 9531, 6811, 2820,
6147, 8146, 298, 1175, 7718, 431, 8814, 414, 822, 7225, 5411,
1711, 684, 3927, 280, 833, 3127, 1218, 1005, 1016, 2531, 2986,
2636, 5886, 7825, 1209, 1978, 6160, 3131, 1414, 2132, 14648,
15241, 10026, 17547, 15592, 15058, 10428, 4166, 9561, 12691,
502, 1799, 13388, 688, 12550, 813, 1191, 10595, 8373, 2613, 1105,
6178, 425, 1272, 4711, 1812, 1739, 1506, 3899, 4488, 4037, 9276,
11447, 1216, 2911, 9364, 4658, 2118, 2977, 23266, 21092, 14126,
24158, 21564, 20858, 14749, 5576, 13729, 19191, 675, 2560, 20214,
1295, 16391, 1577, 2258, 13836, 12573, 3527, 1460, 8431, 568,
1756, 6689, 2734, 2396, 2011, 5571, 6428, 5456, 12184, 15568,
1852, 4565, 13493, 6319, 3101, 4233, 31192), prov = c(2244, 820,
1943, 1726, 1554, 1437, 633, 374, 832, 776, 32, 31, 2759, NA,
-133, 43, 864, 1431, 401, 201, 23, 64, 541, 160, 34, 108, 578,
190, 211, 657, 552, 1460, 1747, 492, 619, 200, 1613, 422, 2095,
1146, 3415, 2978, 3371, 2513, 1131, 821, 1630, 288, 79, 185,
4653, NA, -221, 55, 1628, 2886, 514, 517, 20, 120, 871, 342,
61, 191, 811, 359, 304, 1376, 965, 2402, 3136, 782, 5345, 265,
2594, 432, 3756, 1415, 3742, 4803, 5719, 3918, 970, 2371, 163,
89, 215, 5643, 100, 1480, -250, 121, 2421, 9323, 674, 848, 19,
197, 1241, 432, 90, 297, 1094, 470, 341, 2198, 1381, 3189, 3655,
930, 5550, 873, 3392, 499, 4356, 1765, 5229, 10621, 10644, 5285,
1247, 4005, -430, 30, 218, 6348, 200, 457, -61, 207, 3656, 9541,
349, 1136, -64, 293, 1759, 528, 1228, 428, 1301, 1244, 355, 2871,
2477, 3582, 4595, 935, 6477, 697, 4367, 606, 131, 259, 911, 1846,
1415, 346, 164, 279, -270, 34, 30, 387, NA, 149, -23, NA, 953,
499, 247, 220, -6, 42, 448, 105, 30, 141, 309, -26, 15, 547,
842, 261, 638, 240, 121, -285, -146, 49, 396, 625, 2396, 2734,
2469, 1886, 242, 305, -452, 93, 119, -140, 330, 462, -217, 0,
2296, 791, 422, 162, -80, -38, 104, 958, 205, 60, 295, 552, -387,
25, 1072, 1648, -19, 430, 539, 306, 14, -395, 735, 903, 3493,
3994, 3926, 2674, 471, 341, -1019, 82, 227, 1627, 450, 640, -248,
0, 3042, 1306, 830, 185, -185, -40, 243, 1426, 330, 90, 387,
519, -524, -3, 1575, 2471, -404, 758, 839, 460, 229, -68, 315,
2030, 4892, 5429, 6558, 4772, 593, 1987, -145, 83, 308, 2128,
540, 925, -317, -4, 4117, 353, 951, 185, -259, -74, 420, 1732,
375, 120, 473, 837, -563, -175, 2605, 3358, 13, 1406, 989, 569,
12, 1017, 3014, 21, 625, 1330, 891, 242, 109, -396, -153, 10,
875, 364, 285, -202, 116, 0, 1058, 94, 11, -82, -244, -10, 68,
-226, 39, 80, 135, 101, -322, -333, 236, 755, -659, 575, 0, 404,
29, 182, 3572, 109, 1657, 2469, 1717, 666, 188, -762, -7, 40,
874, 662, 303, 2201, 100, 297, 2308, -56, 42, -92, 388, -16,
108, -228, 534, 162, 199, 86, -463, -443, 227, 1729, -1132, 1116,
-70, 435, 9, -1285, 4631, 158, 3410, 3228, 2553, 1150, 256, -616,
36, 101, 881, 266, 460, 2601, 219, 324, 3100, -3264, 324, -82,
621, 19, 167, -129, 572, 857, 323, 326, -676, -481, 557, 2314,
-1293, 1657, -69, 655, 93, 621, 5043, 1597, 5174, 5168, 4429,
3225, 327, 1186, 526, 170, 899, 2452, 524, 3232, -81, 1172, 3643,
-3248, 665, -92, 1612, 136, 260, 523, 539, 1115, 449, 1026, -386,
-295, 2625, 5407, -1590, 1986, -69, 694, 97, 493, 906, 13, 762,
979, 577, 243, 200, -457, -318, 34, 29, 420, 46, 521, -136, 95,
907, 115, 4, 68, 146, -8, 47, 105, -13, 30, 114, 40, 97, 87,
255, 1434, -236, 101, -198, 236, -14, 91, 139, 1211, 274, 1946,
2229, 1735, 486, 358, -641, -333, 77, 180, 225, 165, 100, -348,
309, 2009, 406, 47, -55, -170, -15, 114, 220, -56, 42, 259, 92,
230, 164, 412, 1739, -638, 143, -498, 477, 18, 270, -521, 2418,
1016, 2985, 3879, 3427, 904, 431, -765, 4, 172, 315, 1842, 282,
515, -354, 401, 2766, 681, 84, 4, -128, -20, 187, 302, -116,
266, 408, 230, 375, 307, 879, 2166, -1532, 107, -814, 730, 14,
280, 180, 3109, 1412, 4470, 5809, 5433, 1609, 501, -542, 2050,
217, 574, 4155, 742, 610, -37, 1266, 3266, 2021, 226, 3, -13,
-26, 298, 719, 177, 437, 503, 556, 898, 480, 956, 2883, -2004,
302, -580, 1075, 286, 621, 344)), row.names = c(NA, -612L), .Names =
c("Col1",
"cpi", "date", "name", "expense", "cost", "prov"), class = "data.frame")

[[alternative HTML version deleted]]

______________________________________________
R-help at r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

```