We accept dates, and fake them otherwise. Dates must be unique. Iterate over data if necessary for multiple intervals.
yint2(X)
X
data.frame with at least columns $date1 and $date2, or $year1 and $year2.
data.frame
$date1
$date2
$year1
$year2
an decimal year value of the time between two dates.