Summarising duplicates in dataframe in R

Question

I have a dateframe with the following data:

#sample data
Date    <-  c(  "2020-01-01",   "2020-01-01",   "2020-01-01",   &quo