как разбить дату заезда и выезда на дневной уровень в R?

Question

У меня есть две таблицы:

no  checkin checkout    
1   1/3/2018    1/5/2018    

И:

no  check-in    check-out   new checkout date

1   1/3/2018    1/5/2018    1/4/2018
1   1/3/2018    1/5/2018    1/5/2018

Я хотел бы просмотреть это на ежедневном уровне.

dailyEsp <- difftime(as.Date(Esp$CheckOut, format = '%m/%d/%Y'), as.Date(Esp$CheckIn, format = '%m/%d/%Y'), units = "days")

for (i in 1:dailyEsp){
  newcheckout = as.Date(Esp$CheckIn, format = '%m/%d/%Y') + i - 1
  merge(Esp[nrow(Esp) + dailyEsp,], newcheckout-1) 
}                     

Я не могуподумайте о том, как объединить существующий набор данных с новой датой оформления заказа.