Group by month to plot on R with Highcharter

Question

I have the following dataset:

xdata <- seq(as.Date("2020-01-01"),as.Date("2020-12-31"), "days")
ydata <- c(1:366)
datamipo