Как построить дату (день и месяц) в r

Question

У меня есть следующие данные (часть моих данных):

 Date         Cases
   <date>      <dbl>
 1 2020-03-02     3
 2 2020-03-03    12
 3 2020-03-04     2
 4 2020-03-05     4
 5 2020-03-06    19
 6 2020-03-07    19
 7 2020-03-08    21
 8 2020-03-09    49
 9 2020-03-10    36
10 2020-03-11    34

Я хотел бы нанести дату на график в тех случаях, когда ось x показывает только день и месяц.

Я пробовал это:

plot(Cases~as.Date(Date),type="l",
     xlab="Date",ylab="Cases")

Но он показывает мне только месяц без даты.

Answer 1

as.Date(Date) дает объект с классом "Date" и, таким образом, вызывает другой plot.* метод, чем вы ожидаете. Вы можете опустить ось x, используя xaxt="n", и перестроить ее, используя axis и mtext. Функция axTicks помогает получить красивые отметки.

with(dat, plot(Cases ~ as.Date(Date), type="l", xlab="Date", xaxt="n", ylab="Cases"))
at. <- axTicks(1)
axis(1, at=at., labels=F)
mtext(strftime(dat$Date, format="%d.%m.")[match(as.numeric(as.Date(dat$Date)), 
                                                at.)], 1, 1, at=at.)