在 plotly-R 中包含颜色图例并将调色板更改为 blue/red
Include color legend inside the plot and change palette to blue/red in plotly-R
我有一个数据库 df,其中包含 2020 年 1 月至 7 月期间世界上一些国家的 Covid 影响信息。
按照 https://www.youtube.com/watch?v=RrtqBYLf404 中的代码,我创建了以下动态地图。
library(plotly)
graph = plot_geo(df,
locationmode = "country-names",
frame = ~month) %>%
add_trace(locations = ~iso,
z = ~effect_covid_avg,
zmin = min(df$effect_covid_avg),
zmax = max(df$effect_covid_avg),
color = ~effect_covid_avg,
colorscale = 'Hot', #colorscale = 'heat', 'diverging', #colorscale = 'YlOrRd',
text = ~hover,
hoverinfo = 'text')
graph
但是,我想截取几个月的屏幕截图,以便将它们包含到静态 pdf 文件中。
我想做一些修改,以便:
- 调色板的颜色(蓝色为正,红色为负,白色为 0)。 如您所见,我尝试了几个调色板,但没有成功('heat', 'diverging', 'YlOrRd').
- 在图中包含颜色图例。
我的其中一张截图是这样的。
有线索吗?
谢谢
- 通过将 zmin 和 zmax 修改为相同的值但符号不同,您可以在中间找到 0。
- 通过将“colorscale”更改为“colors”,您可以自由使用调色板。因此,通过应用“RdBu”,您可以得到红色的负片和蓝色的正片。
1 和 2 组合起来是这样的:
graph = plot_geo(some_data_values,
locationmode = "country-names",
frame = ~month) %>%
add_trace(locations = ~iso,
z = ~effect_covid_avg,
zmin = -0.8, # below the min (so 0 is at the center of the palette)
zmax = 0.8, # over the max (so 0 is at the center of the palette)
color = ~effect_covid_avg,
colors = 'RdBu',
text = ~hover,
hoverinfo = 'text')
graph
还是要解决怎么把图例放到剧情中?
我有一个数据库 df,其中包含 2020 年 1 月至 7 月期间世界上一些国家的 Covid 影响信息。 按照 https://www.youtube.com/watch?v=RrtqBYLf404 中的代码,我创建了以下动态地图。
library(plotly)
graph = plot_geo(df,
locationmode = "country-names",
frame = ~month) %>%
add_trace(locations = ~iso,
z = ~effect_covid_avg,
zmin = min(df$effect_covid_avg),
zmax = max(df$effect_covid_avg),
color = ~effect_covid_avg,
colorscale = 'Hot', #colorscale = 'heat', 'diverging', #colorscale = 'YlOrRd',
text = ~hover,
hoverinfo = 'text')
graph
但是,我想截取几个月的屏幕截图,以便将它们包含到静态 pdf 文件中。 我想做一些修改,以便:
- 调色板的颜色(蓝色为正,红色为负,白色为 0)。 如您所见,我尝试了几个调色板,但没有成功('heat', 'diverging', 'YlOrRd').
- 在图中包含颜色图例。
我的其中一张截图是这样的。
有线索吗?
谢谢
- 通过将 zmin 和 zmax 修改为相同的值但符号不同,您可以在中间找到 0。
- 通过将“colorscale”更改为“colors”,您可以自由使用调色板。因此,通过应用“RdBu”,您可以得到红色的负片和蓝色的正片。
1 和 2 组合起来是这样的:
graph = plot_geo(some_data_values,
locationmode = "country-names",
frame = ~month) %>%
add_trace(locations = ~iso,
z = ~effect_covid_avg,
zmin = -0.8, # below the min (so 0 is at the center of the palette)
zmax = 0.8, # over the max (so 0 is at the center of the palette)
color = ~effect_covid_avg,
colors = 'RdBu',
text = ~hover,
hoverinfo = 'text')
graph
还是要解决怎么把图例放到剧情中?