R语言如何在ggplot2中注释一个特定的群集或组

R编程语言中的ggplot方法是用来使用指定的数据框架进行图形可视化的。它被用来实例化一个ggplot对象。可以为绘图对象创建美学映射，以分别确定x轴和y轴之间的关系。可以向创建的ggplot对象添加其他组件。

语法：ggplot(data = NULL, mapping = aes(), fill = )

参数 :

data – 用于绘图的默认数据集。

mapping – 绘图使用的美学贴图列表。

地形图可以用各种方法添加到绘图中。R中的geom_point()方法可以用来在R中创建的图形中为散点图添加点，这些点可能包含也可能不包含审美贴图，例如，颜色。

geom_point(aes(color= ))

颜色可以分配给数据框架中的各列组。数据框中的点可以用图形中的点来标记。因此，可以通过创建点来创建一个散点图。这些点可能属于也可能不属于同一个组。这些组可以在图中以不同的方式进行标注。

方法1：使用geom_mark_circle包

geom_mark_circle geom方法允许用户通过圆圈来注释点的集合。该方法可以包含一组美学映射，使用颜色、位置或标签来指定。

geom_mark_circle(aes(color = ))

这些点可以根据它们所对应的分组栏值被赋予不同的颜色。这些点用不同的颜色进行标记。然后用R语言中的geom_mark_circle()方法在它们周围构建圆圈，这样就可以隔离属于不同组的标记点。最初，col1点被标记为x轴点，col2点被标记为y轴点，对应于数据框架。这些点被标记为属于不同的颜色，可以使用美学映射来指定，并作为组件添加到ggplot()方法中。使用geom_point()组件为这些点分配颜色。

# importing the required library
library(ggplot2)
data_frame < - data.frame(stringsAsFactors=FALSE,
                          col1=c(rep(LETTERS[1:3], each=4)),
                          col2=c(rep(1: 4, each=3)),
                          col3=c(1: 12))
print("original dataframe")
print(data_frame)
data_frame % >%
ggplot(aes(x=col2,
           y=col3))+
 
# marking circles
geom_mark_circle(aes(color=col1))+
 
# marking points on the plot
geom_point(aes(color=col1))

输出

[1] "original dataframe"
> print(data_frame)
  col1 col2 col3
1     A    1    1
2     A    1    2
3     A    1    3
4     A    2    4
5     B    2    5
6     B    2    6
7     B    3    7
8     B    3    8
9     C    3    9
10    C    4   10
11    C    4   11
12    C    4   12

如何在R语言的ggplot2中注释一个特定的群集或组？

方法2：使用geom_mark_ellipse方法

geom_mark_ellipse() geom方法允许用户通过圆圈对点的集合进行注释。该方法可以包含一组美学映射，用颜色、位置来指定。标签也可以用这个方法中的标签参数来分配。

geom_mark_circle(aes(color = , label =  ))

这些点可以根据它们所对应的分组栏值被赋予不同的颜色。这些点被用不同的颜色标记。然后用R语言中的geom_mark_ellipse()方法在它们周围构建椭圆，这就把属于不同组的点标记出来。

# importing the required library
library(tidyverse)
data_frame < - data.frame(stringsAsFactors=FALSE,
                          col1=c(rep(LETTERS[1:3], each=4)),
                          col2=c(rep(1: 4, each=3)),
                          col3=c(1: 12))
print("original dataframe")
print(data_frame)
data_frame % >%
ggplot(aes(x=col2,
           y=col3))+
 
geom_mark_ellipse(aes(color=col1,
                      label=col1),
                  )+
 
geom_point(aes(color=col1))

输出

[1] "original dataframe"
> print(data_frame)
 col1 col2 col3
1     A    1    1
2     A    1    2
3     A    1    3
4     A    2    4
5     B    2    5
6     B    2    6
7     B    3    7
8     B    3    8
9     C    3    9
10    C    4   10
11    C    4   11
12    C    4   12

如何在R语言的ggplot2中注释一个特定的群集或组？