R Shiny daterange shows non existent date in data

Question

I have a histogram plot that has dateRangeInput. the code for the menuItem is:

            menuItem(text = \'Plot\', tabName = \'Plo