Как сделать geom_line () более плавным на графике временного ряда

Question

Я новичок в R, и в настоящее время я учусь строить с помощью ggplot2. Я загрузил некоторые данные COVID-19, и я пытаюсь создать график, где ось x - это дата, а y - это случаи.

Фрейм данных

Мой код указан ниже:

data<- structure(list(date = structure(c(18344, 18343, 18341, 18340, 
18339, 18338, 18337, 18336, 18333, 18331, 18330, 18329, 18328, 
18325), class = "Date"), cases = c(69L, 71L, 36L, 91L, 92L, 57L, 48L, 23L, 
252L, 75L, 7L, 8L, 3L, 3L)), class = "data.frame", row.names = 
c(1548L,1549L, 1551L, 1552L, 1553L, 1554L, 1555L, 1556L, 1559L, 1561L, 
1562L, 1563L, 1564L, 1567L))

library(ggplot2)

a<- ggplot(data=data, aes(x=date, y=cases)) +
geom_point() +
geom_line()+
scale_x_date(date_breaks = "1 day", date_labels =  "%d %b %Y") +
theme(axis.text.x=element_text(angle=60, hjust=1)) 

a

К сожалению, я не могу сделать линию гладкой (она выглядит как изо дня в день), хотя я пытался использовать информацию, которую я видел в других сообщениях.

Буду признателен за любую помощь :) Спасибо

Answer 1

Вы пробовали geom_smooth?

a<- ggplot(data=denmark, aes(x=date, y=cases)) +
geom_point() +
geom_smooth(method = "loess") +
scale_x_date(date_breaks = "1 day", date_labels =  "%d %b %Y") +
theme(axis.text.x=element_text(angle=60, hjust=1)) 

Answer 2

Вы настроили дату как. Дата и упорядочили данные по дате, прежде чем пытаться построить?

вот так:

denmark <- denmark[order(denmark$date),]

Надеюсь, это поможет вам!