在R中复制每一行4次

Question

我有以下数据（dt.prediction）：

InlineShape AddPicture(
    string FileName,
    ref Object LinkToFile,
    ref Object SaveWithDocument,
    ref Object Range
)

现在我需要复制每一行4次。我试过了

    Time                                         Prediction
 1 02.01.2015 01:00 - 02.01.2015 02:00 (CET)     10984
 2 02.01.2015 02:00 - 02.01.2015 03:00 (CET)     10600
 3 02.01.2015 03:00 - 02.01.2015 04:00 (CET)     9900
 4 02.01.2015 04:00 - 02.01.2015 05:00 (CET)     9857
 5 02.01.2015 05:00 - 02.01.2015 06:00 (CET)     10615

但是因为时间是一列中的所有这些值，所以它不起作用。如果我订购它2016年位于底部和顶部，而我的数据集中有2015-2017。有没有办法以正确的方式订购？或者我是否需要以某种方式将时间列拆分为更多列或其他内容？

谢谢！