达州做网站
大橙子网站建设，新征程启航
为企业提供网站建设、域名注册、服务器等服务
如何用R语言的ggplot2+ggforce包绘制散点图并添加分组边界
本篇文章给大家分享的是有关如何用R语言的ggplot2+ggforce包绘制散点图并添加分组边界，小编觉得挺实用的，因此分享给大家学习，希望大家阅读完这篇文章后可以有所收获，话不多说，跟着小编一起来看看吧。
创新互联主营揭西网站建设的网络公司,主营网站建设方案,app软件开发公司,揭西h5小程序制作搭建,揭西网站营销推广欢迎揭西等地区企业咨询
今天查找桑基图的资料的时候发现了一份介绍ggforce这个包的使用方法的文章，发现发现添加分组边界还有其他的实现方法，今天的推文记录一下。
示例数据就直接使用R语言内置的鸢尾花数据集
使用的是 geom_mark_rect() 函数
df<-iris
colnames(df)<-paste0("V",1:5)
library(ggplot2)
library(ggforce)
ggplot(data=df,aes(x=V1,y=V2,color=V5))+
geom_point()+
geom_mark_rect(aes(fill=V5),alpha=0.1)+
theme_bw()
使用到的是geom_mark_circle()函数
df<-iris
colnames(df)<-paste0("V",1:5)
library(ggplot2)
library(ggforce)
ggplot(data=df,aes(x=V1,y=V2,color=V5))+
geom_point()+
geom_mark_circle(aes(fill=V5),alpha=0.1)+
theme_bw()+
coord_cartesian(clip = "off")+
theme(plot.margin = margin(50,50,50,150),
legend.background = element_blank())
这里又遇到了一个新的知识点
coord_cartesian(clip = "off")，如果加上这一行命令，就能够让三个圆圈在最上层，不加的效果如下图，显示不全参考链接是 https://guangchuangyu.github.io/2018/05/ggplot2-clip/
用到的是geom_mark_ellipse（）函数
df<-iris
colnames(df)<-paste0("V",1:5)
library(ggplot2)
library(ggforce)
ggplot(data=df,aes(x=V1,y=V2,color=V5))+
geom_point()+
geom_mark_ellipse(aes(fill=V5),alpha=0.1)+
theme_bw()+
coord_cartesian(clip = "off")+
theme(plot.margin = margin(10,10,10,50),
legend.background = element_blank())
用到的是geom_mark_hull()函数
df<-iris
colnames(df)<-paste0("V",1:5)
library(ggplot2)
library(ggforce)
#install.packages("concaveman")
library(concaveman)
ggplot(data=df,aes(x=V1,y=V2,color=V5))+
geom_point()+
geom_mark_hull(aes(fill=V5),alpha=0.1)+
theme_bw()+
coord_cartesian(clip = "off")+
theme(plot.margin = margin(10,10,10,50),
legend.background = element_blank())
这里会遇到一个警告信息Warning message: The concaveman package is required for geom_mark_hull需要安装并加载concaveman这个包 ··· install.packages("concaveman") library(concaveman) ···
df<-iris
colnames(df)<-paste0("V",1:5)
library(ggplot2)
library(ggforce)
#install.packages("concaveman")
library(concaveman)
ggplot(data=df,aes(x=V1,y=V2,color=V5))+
geom_point()+
geom_mark_ellipse(aes(fill=V5,label=V5),alpha=0.1)+
theme_bw()+
coord_cartesian(clip = "off")+
theme(plot.margin = margin(10,10,10,50),
legend.background = element_blank())
以上就是如何用R语言的ggplot2+ggforce包绘制散点图并添加分组边界，小编相信有部分知识点可能是我们日常工作会见到或用到的。希望你能通过这篇文章学到更多知识。更多详情敬请关注创新互联行业资讯频道。
当前标题：如何用R语言的ggplot2+ggforce包绘制散点图并添加分组边界
网页URL：http://dzwzjz.com/article/peddpo.html