Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/76.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/6/EmptyTag/138.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
删除ggplot2 r中带有geom_多边形的图例上的线_R_Plot_Ggplot2 - Fatal编程技术网

删除ggplot2 r中带有geom_多边形的图例上的线

删除ggplot2 r中带有geom_多边形的图例上的线,r,plot,ggplot2,R,Plot,Ggplot2,您好,我正在尝试使用geom_多边形ggplot2绘制地图。当我在地图上添加“边界”时,它也会在图例上添加“线”。有人能提出删除图例上这些线条的方法吗(但同时保留“地图上的边界”) 我的代码如下 ggplot(outputData, aes(long,lat, group = group)) + geom_polygon(aes(fill = meanadjsmr), colour = "black") + labs(x=" ", y=" ") + scale_fill_manual(na

您好,我正在尝试使用geom_多边形ggplot2绘制地图。当我在地图上添加“边界”时,它也会在图例上添加“线”。有人能提出删除图例上这些线条的方法吗(但同时保留“地图上的边界”)

我的代码如下

ggplot(outputData, aes(long,lat, group = group)) + 
geom_polygon(aes(fill = meanadjsmr), colour = "black") + 
labs(x=" ", y=" ") + 
scale_fill_manual(name = "", values = cust_brewer) + 
theme(legend.text = element_text(size = 12))

无法在没有数据的情况下进行测试,但请尝试以下操作:

#  Not tested...
ggplot(outputData, aes(long,lat, group = group)) + 
  geom_polygon(aes(fill = meanadjsmr)) + 
  geom_path() +
  labs(x=" ", y=" ") + 
  scale_fill_manual(name = "", values = cust_brewer) + 
  theme(legend.text = element_text(size = 12))

由于
color=black
,图例上出现了行。您可以使用
geom_path(…)
获取边界。

没有数据无法测试,但请尝试以下方法:

#  Not tested...
ggplot(outputData, aes(long,lat, group = group)) + 
  geom_polygon(aes(fill = meanadjsmr)) + 
  geom_path() +
  labs(x=" ", y=" ") + 
  scale_fill_manual(name = "", values = cust_brewer) + 
  theme(legend.text = element_text(size = 12))

由于
color=black
,图例上出现了行。您可以使用
geom_path(…)
来获取边框。

尝试将此添加到ggplot调用中:
guides(fill=guide\u图例(override.aes=list(color=NA))
尝试将此添加到ggplot调用中:
guides(fill=guide\u图例(override.aes=list(color=NA))