r - R : 特定の列に新しい値のセットを使用して、データ フレーム内の行を繰り返します。

Question

employee <- c("John", "Adi", "Sam")
salary <- c(21000, 22000, 23000)
startdate <- as.Date(c("2014-11-01","2014-01-01","2014-10-01"))
enddate <- as.Date(c("2015-10-31","2014-12-31","2015-10-31"))
N<- c(2,1,2)
df<- data.frame(employee,salary, startdate, enddate, N)

N列に「n」を指定した行全体を「n」回繰り返したいが、元の行の終了日を「 2014/12/31」などの固定日に変更して作りたいこの固定日を繰り返し行のstartdateとして使用します。コードを実行して、結果の例 (期待される出力) をdf2で確認します。

employee <- c(rep("John",2), "Adi", rep("Sam",2))
salary <- c(21000,21000, 22000, 23000,23000)
startdate <- as.Date(c("2014-11-01","2014-12-31", "2014-01-01","2014-10-01","2014-12-31"))
enddate <- as.Date(c("2014-12-31","2015-10-31","2014-12-31","2014-12-31","2015-10-31"))
N<- c(2,2,1,2,2)
df2<- data.frame(employee,salary, startdate, enddate, N)