r - 尝试更改 R 中的时间标签
问题描述
我发布这个是因为我的代码有一点问题。我想做的是使用 AUTOARIMA 脚本预测一个省未来 30 天的 COVID 病例。一切都很好,但是当我绘制预测模型时,日期标签以 25% 的增量出现(即:2020.2、2020.4 等),但我想用 YMD 格式标记该轴。这是我的代码:
library(readxl)
library(ggplot2)
library(forecast)
data <- read_xlsx("C:/Users/XXXX/Documents/Casos ARIMA Ejemplo.xlsx")
provincia_1 <- ts(data$Provincia_1, frequency = 365, start = c(2020,64))
autoarima_provincia1 <- auto.arima(provincia_1)
forecast_provincia1 <- forecast(autoarima_provincia1, h = 30)
plot(forecast_provincia1, main = "Proyeccion Provincia 1", xlab = "Meses", ylab = "Casos Diarios")
当我绘制预测时,这就是出现的情况(我之前在日期标签上说过的问题)
数据库在这里:
解决方案
尝试创建一个 data.frame,其中一列是您的预测,另一列是每日日期。然后绘制它。
如下所示介绍您的开始和结束日期,然后在“by”参数中,请查看此链接中的文档: https ://www.rdocumentation.org/packages/base/versions/3.6.2/topics/as.Date
df <- data.frame(
date=seq(as.Date("1999-01-01"), as.Date("2014-01-10"), by="6 mon"),
pred_val = forecast_provincia1
)
with(df, plot(date, pred_val ))
我从这里得到启发: R X-axis Date Labels using plot()
推荐阅读
- image - JPEG 或 Fractal 压缩指纹图像?
- json - npm start 命令不适用于我的反应应用程序
- c# - Xamarin 条形码应用程序 Zxing.Net.Mobile 无法正常工作
- vb.net - 如何防止 RichTextBox 自动更改对齐方式?
- math - 乳胶中的年轻图表 - 大条和大括号
- dart - 如何使 websocket 响应显示在与发送消息相同的小部件中,例如正确的聊天屏幕
- javascript - Javascript "if" 和 "or" 如何检查哪个会执行
- python - 与部门和楼层操作员不同的答案
- java - 如何在 json 中发送文件和节点 js 中的其他数据
- linux-kernel - 无法交叉编译简单的内核模块