怎么用ggplot2用坐标勾勒出区域？

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

我有几个坐标，想根据坐标画出一个多边形作为一个区域，我用的是ggplot2里的geom_polygon：

ggplot(data=ghzx,aes(x=经度,y=纬度))+

  geom_point()+geom_polygon(color="black")

但是出来的效果不是一个大的多边形，而是几个多边形叠加在一起，是哪里出了问题？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：ggplot2 gplot plot GPL polygon

在结尾加上 + coord_fixed()
具体参考这个文章http://rmhogervorst.nl/cleancode/blog/2017/01/06/plotting-a-map-with-ggplot2.html

owenqi 发表于 2018-2-24 13:45
在结尾加上 + coord_fixed()
具体参考这个文章http://rmhogervorst.nl/cleancode/blog/2017/01/06/plottin ...

coord_fix()加上后改变的是坐标不被拉伸，不能做出圆滑的区域勾勒线

应该是数据的顺序问题，你确定x，y数据是按照你想要的图形按顺时针或者逆时针排列的吗？
举个栗子：

1. library(tidyverse)
   
2. poly <- data_frame(x = c(2, 1.11, 2, 3, 4, 4.1, 4.1, 4, 4),
   
3.                    y = c(4, 0.9, 0.7, 0.5, 0.1, 1.5, 2.3, 3.5, 5))
   
4. 
   
5. # 按照逆时针顺序排列下作图
   
6. poly %>%
   
7.   ggplot(aes(x = x, y = y)) +
   
8.   geom_polygon(fill = "lightblue")
   
9. 
   
10. # 按照随机顺序排列作图
    
11. poly %>%
    
12.   sample_frac(1) %>%
    
13.   ggplot(aes(x = x, y = y)) +
    
14.   geom_polygon(fill = "lightblue")

复制代码

顺时针排列的作图：

随机排列的作图：

dasha217 发表于 2018-2-24 17:18
coord_fix()加上后改变的是坐标不被拉伸，不能做出圆滑的区域勾勒线

多谢指正