Sequential numbering based on another column (date) R

Question

I need to make a column with sequential numbers based on the date. There are multiple rows of the same date, and should look like so:

       nest in.temp out.