坐标系可能是ggplot2中最复杂的部分。默认的坐标系是笛卡尔直角坐标系,可以通过其独立作用的x坐标和y坐标找到每个数据点。偶尔也会用到一些其他类型的坐标系。
文章内容摘要:
coord_flip()函数:交换x轴和y轴
coord_quickmap()函数:为地图设置合适的纵横比
coord_polar()函数:极坐标系绘图
coord_flip()函数
当我们绘制箱线图时,x轴上往往会出现标签重叠的情况,我们可以使用coord_flip()
函数交换x轴和y轴。
ggplot(mpg,aes(class,hwy))+geom_boxplot()+coord_flip()
image.png
coord_quickmap()函数
coord_quickmap()
函数可以为地图设置合适的纵横比。当ggplot2绘制空间数据时,这个函数特别重要。
调整纵横比之前:
nz <- map_data("nz")
ggplot(nz,aes(long,lat,group=group))+geom_polygon(fill="white",color="black")
image.png
调整纵横比之后:
ggplot(nz,aes(long,lat,group=group))+geom_polygon(fill="white",color="black")+coord_quickmap()
image.png
两者之间就只差一句
coord_quickmap()
可见此函数的重要性。
当然,如果想要绘制世界地图的话,我们只需要将map_data("nz")
改为map_data("world")
,我们可以这样写:
world <- map_data("world")
ggplot(world,aes(long,lat,group=group))+geom_polygon(fill="white",color="black")+coord_quickmap()
image.png
当然,世界地图也并不只是全部,你还可以把它变换成 county、france、italy、state、usa、world2。
county
france
italy
state
usa
world2
同样的,完成上面的所有内容,只需要改变
map_data()
括号内的名称,当然这些图片看上去并没有那么的绚丽多彩,因为许多时候往往需要我们去改变一些参数,才能让它更美观。
Sure,如果你想画中国地图我还是推荐你去用Y叔写的包(当然本人也是Y叔的忠实粉丝之一),chinamap包:https://github.com/GuangchuangYu/chinamap
安装方式:remotes::install_github("GuangchuangYu/chinamap")
附上原代码:
cn <- get_map_china()
ggplot()+geom_map(aes(long,lat,map_id=id,fill=group),map=cn,data=cn)+coord_map()+theme(legend.position='none')
image.png
关于
coord_quickmap
就提这么多,在绘制地图时,这个函数经常用到。
coord_polar()函数
还记得上高中那会,数学试卷的最后大题是2选1,一个是极坐标,一个是绝对值,这里的coord_polar()
函数就是使用的极坐标系。
极坐标可以揭示出条形图和鸡冠花图的一种有趣联系:
bar <- ggplot(diamonds)+geom_bar(aes(cut,fill=cut),show.legend=FALSE,width=1)+theme(aspect.ratio=1)+labs(x=NULL,y=NULL)
bar+coord_flip()
bar+coord_polar()
条形图
鸡冠花图
条形图的数值大小,在转换为鸡冠花图后,改为比例大小。
下面是一些相关的练习:
(1)使用coord_polar()函数将堆叠式条形图转换为饼图。
ggplot(diamonds)+geom_bar(aes(cut,fill=clarity))+coord_polar()
image.png
(2)
labs()
函数的功能是什么?阅读一下文档。labs可用于添加识别标签,以区分多个绘图。
(3)
coord_quickmap()
函数和coord_map
函数的区别是什么?coord_map使用mapproj软件包定义的任何投影,将地球的一部分(近似球形)投影到二维平面上。地图投影一般不会保留直线,因此这需要大量的计算。coord_quickmap是一种快速近似,可以保留直线。它最适用于靠近赤道的较小区域。这意味着你对coord_quickmap的绘制不满意时,你可以尝试一下coord_map。
(4)下图表明城市和公路燃油效率之间有什么关系?为什么coord_fixed()函数很重要?geom_abline()函数的作用是什么?
ggplot(mpg,aes(cty,hwy))+geom_point()+geom_abline()+coord_fixed()
image.png
一加仑油行驶的距离越远,则燃油效率越高。
coord_fixed()
坐标系纵横比可以设置固定,固定纵横比后,无论什么图形,其比例都是一样的。geom_abline()
添加回归曲线。
在简书写文章第6天了,感谢几天以来支持我的仅有的一个粉丝,虽然听上去有些心酸,但是在成长的路上,还是给了我很大的鼓舞,我希望我们能够一起成长,一起学习和努力,而我也会逐渐提升文章的质量,在这个过程中锻炼自己的语言组织能力,也希望大家对文章的不足提出建议,这将会让我更好的对待目前的“工作”,谢谢观看。
网友评论