[英]How to plot week for each year on x axis in plot_ly.(R Language)
我有一个数据集如下:
我想为 X 轴绘制 Y 轴上的实际值和拟合值,这将显示周和年。
我创建了一个名为 Year_Week 的新变量并尝试绘制它,因为它的 x 轴采用升序数据。 数据绘制正确,但我正在为 X 轴的命名而苦苦挣扎。
这是我正在使用的 plot_ly 代码。
output$plot_forecast <- renderPlotly({
data <- forecast_data()
plot <- plot_ly(data, type = "scatter", mode = 'lines') %>%
add_lines(x = ~ data$year_week,
y = ~ data$actual,
name ="Actual",
line=list(color="Red")) %>%
add_lines(x = ~ data$year_week,
y = ~ data$fitted,
name ="Predicted",
line=list(color="Green")) %>%
layout(title = "Total Sales (Actual vs Predicted)",
xaxis = list(title = "Year Week"),
yaxis = list (title = "Total POS Sales"),
legend = list(x = 100, y = 0.5))
return(plot) })
x 轴当前显示 201.49K 表示 2014 年的第 9 周,201.53K 表示 2015 年的第 3 周。
我需要 x 轴比这些数字更好。
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.