R累积权益数据-添加时间和价格

我有一些数据格式如下。我对此做了一些分析，并希望能够在与分析数据相同的图表中绘制价格发展。 这要求我的数据具有相同的x轴

所以我想把“股票”一栏加起来，比如说150个增量，然后加上“最终价格”和“时间”。 聚合应该包括最新的时间和价格，因此如果聚合需要在两行或多行数据上进行，那么最后一行应该提供价格和时间数据

我的问题是如何创建一个每行150个共享的新向量。 向量的长度将等于总和（份额）/150

有没有一个简单的方法可以做到这一点？提前谢谢

编辑： 我考虑使用rep（finalprice，shares）扩展观测值，然后得到扩展向量的每150个值。

数据样本：

"date","ord","shares","finalprice","time","stock"
20120702,E,2000,99.35,540.84753333,500
20120702,E,28000,99.35,540.84753333,500
20120702,E,50,99.5,542.03073333,500
20120702,E,13874,99.5,542.29411667,500
20120702,E,292,99.5,542.30191667,500
20120702,E,784,99.5,542.30193333,500
20120702,E,13300,99.35,543.04805,500
20120702,E,16658,99.35,543.04805,500
20120702,E,42,99.5,543.04805,500
20120702,E,400,99.4,546.17173333,500
20120702,E,100,99.4,547.07,500
20120702,E,2219,99.3,549.47988333,500
20120702,E,781,99.3,549.5238,500
20120702,E,50,99.3,553.4052,500
20120702,E,1500,99.35,559.86275,500
20120702,E,103,99.5,567.56726667,500
20120702,E,1105,99.7,573.93326667,500
20120702,E,4100,99.5,582.2657,500
20120702,E,900,99.5,582.2657,500
20120702,E,1024,99.45,582.43891667,500
20120702,E,8214,99.45,582.43891667,500
20120702,E,10762,99.45,582.43895,500
20120702,E,1250,99.6,586.86446667,500
20120702,E,5000,99.45,594.39061667,500
20120702,E,20000,99.45,594.39061667,500
20120702,E,15000,99.45,594.39061667,500
20120702,E,4000,99.45,601.34491667,500
20120702,E,8700,99.45,603.53608333,500
20120702,E,3290,99.6,609.23213333,500

---

我想我已经解决了

expand <- rep(finalprice, shares) 

Increment <- expand[seq(from = 1, to = length(expand), by = 150)]

展开