使用 R 在 x 轴上显示带有日期的密度（）图

Question

我在

方面取得了部分成功

input = "date,data
1-1-2015,5.5
2-1-2016,1.0
3-1-2016,4.0
4-1-2016,4.0
5-1-2019,3.0"
new = read.csv(text=input)
new$date = as.Date(new$date, "%d-%m-%Y")
new$date = as.numeric(new$date, as.Date("2015-01-01"), units="days") #https://stat.ethz.ch/pipermail/r-help/2008-May/162719.html
plot(density(new$date))

导致工作图，不幸的是 x 轴显然被格式化为整数。如何生成 x 轴格式为数据的图形？

我预计

new = read.csv(text=input)
new$date = as.Date(new$date, "%d-%m-%Y")
plot(density(new$date))

工作，不幸的是它因 Error in density.default(new$date) : argument 'x' must be numeric 而崩溃。

Answer 1

density() 并未真正针对日期进行优化。最简单的解决方法可能是将默认轴标签替换为日期值。以下是您可以如何做到这一点

plot(density(new$date), xaxt="n")
at<-axTicks(1)
axis(1,at, as.Date(at, origin="1970-01-01"))

使用 R 在 x 轴上显示带有日期的密度（）图

Display density() graph with date in x axis using R

label

r

date

graph