Unable to render geom_line() and illegible x-axis values

[rahul-bharadwaj]

library(ggplot2)
library(tibble)

count_date1 <- tribble(~Date, ~freq,
                "13-04-2015", 24,
                "13-05-2015", 12,
                "13-06-2015", 32,
                "14-04-2015", 23,
                "14-05-2015", 15,
                "14-06-2015", 16,
                "15-04-2015", 12,
                "15-05-2015", 12,
                "4/1/2015", 18,
                "4/10/2015", 21,
                "4/11/2015", 5,
                "4/12/2015", 15,
                "4/2/2015", 27,
                "4/7/2015", 15,
                "4/4/2015", 12,
                "4/5/2015", 6)

ggplot(count_date1, aes(Date,freq)) + 
    geom_point() + 
    geom_line(aes(group=Date)) +
    xlab("Date") + 
    ylab("No. of Complaints")
#> geom_path: Each group consists of only one observation. Do you need to adjust
#> the group aesthetic?

^{Created on 2020-08-13 by the reprex package (v0.3.0)}