我尝试使用xts中的apply.weekly()函数聚合我的数据。但是，当我这样做时，一周有8天而不是7天。以下是apply.weekly()函数的输出：
2013-06-01 0.0000000
2013-06-08 0.5718182
2013-06-15 0.3365385
2013-06-22 0.7534615
2013-06-30 0.7467568
2013-07-07 0.7996000
2013-07-13 0.2811111
2013-07-21 0.3743750
2013-07-28 0.2142857
2013-08-04 0.5664516
2013-08-11 0.5790000
2013-08-18 0.3404255
2013-08-24 0.5240625
2013-08-31 1.1986207
2013-09-06 4.8233333
正如您所看到的，在上面的输出中，＆＃34; 2013-06-22＆＃34;和＆＃34; 2013-06-30＆＃34;有8天，它改变了我的程序中的所有连续索引。有趣的是，＆＃34; 2013-08-18＆＃34;和＆＃34; 2013-08-24＆＃34;只有6天。
我知道如何解决这个问题？
编辑：这是数据的一瞥
index price
2013-06-01 0.000
2013-06-06 5.290
2013-06-08 1.000
2013-06-13 6.750
2013-06-15 1.000
2013-06-15 1.000
2013-06-17 1.000
2013-06-19 1.000
2013-06-20 1.000
2013-06-21 16.590
2013-06-24 5.990
2013-06-25 4.650
2013-06-26 1.000
2013-06-26 11.990
2013-06-27 1.000
2013-06-29 1.000
2013-06-29 1.000
2013-06-30 1.000
加载此数据后，我只是尝试使用以下命令：
price_weekly <- apply.weekly(dt$price,mean)