R ggplot2控制图例列

如何解决R ggplot2控制图例列

我想使用$url = parse_url("http://dev.example.com/state/store"); 命令ggplot在图例的三列中显示离散类别。

但理想情况下，我想

a）以有意义的方式组织图例关键字列（下面将保留所有否定类别，在中间保留0个单独的值，在右列保留所有正值）

b）理想情况下，每列还应具有一个列标题（例如“正”，“无”，“负”）

当前，如您所见，这些列只是按照因子级别的顺序进行组织的。 任何想法如何做到这一点？

非常感谢您的帮助！

guides(fill = guide_legend(ncol=3))

解决方法

您可以尝试使用new_scale_fill软件包的ggnewscale功能。

library(ggnewscale)

pal_rdbu <- scales::brewer_pal(palette = "RdBu")(7)

ggplot(world) +
  geom_polygon(aes(x=long,y=lat,group=group,fill=value)) +
  coord_quickmap() + 
  theme_void()+ 
  scale_fill_manual(name = "positive",breaks = 3:1,values=c(NA,NA,pal_rdbu[5:7]))+
  new_scale_fill() +
  geom_polygon(aes(x=long,fill=value)) +
  scale_fill_manual( name = "neutral",breaks = 0,pal_rdbu[4],NA)) +
  new_scale_fill() +
  geom_polygon(aes(x=long,fill=value)) +
  scale_fill_manual( name = "negative",breaks = -1:-3,values=c(pal_rdbu[1:3],NA)) +
  theme(legend.position = "bottom",legend.direction = 'vertical')