Trying to calculate aging and write it into a newly added column in excel dynamically in R

Question

Function group_tenure is working but not able to write “0-1 Days” etc in new column along with the filtered value. Here TodayNew is the column in excel which has aging.