我使用echarts4r日历显示四年。热图颜色仅适用于第一年和去年。
这是代码:
dates <- seq.Date(as.Date("2017-01-01"), as.Date("2020-12-31"), by = "day")
values <- rnorm(length(dates), 20, 6)
year <- data.frame(date = dates, values = values)
# calendar multiple years
year |>
dplyr::mutate(year = format(date, "%Y")) |>
group_by(year) |>
e_charts(date) |>
e_calendar(range = "2020", top = 40) |>
e_calendar(range = "2019", top = 260) |>
e_calendar(range = "2018", top = 460) |>
e_calendar(range = "2017", top = 660) |>
e_heatmap(y=values, coord_system = "calendar",name=values,calendar=0) |>
e_heatmap(y=values, coord_system = "calendar",name=values,calendar=1) |>
e_heatmap(y=values, coord_system = "calendar",name=values,calendar=2) |>
e_heatmap(y=values, coord_system = "calendar",name=values,calendar=3) |>
e_visual_map(max = 30)
我为每个日历索引添加了“e_heatmap(y=values, coord_system = "calendar",name=values,calendar=1) |>”,但它仍然不起作用。
检查您的 SASSA 状态和复议状态。正在通过此网关从 SASSA 官方网站检索数据。