I have a table as shown in the image, where each comment has a publication date, with year, month, day and time, I would like to add the sentiment values by day.

this is how the table is composed
serie <- data.frame(comments$created_time,sentiment2$positive-sentiment2$negative)