R语言合并多个ggplot2图例

在这篇文章中，我们将看到如何在R编程语言中结合多个ggplot2图例。

安装

首先，通过使用 library() 函数加载ggplot2软件包。如果你还没有安装它，你可以通过在R控制台中编写以下命令来安装它。

install.packages("ggplot2")

为了创建一个R图，我们使用 ggplot() 函数，为了使其成为散点图，我们在ggplot()函数中加入 geom_point() 函数。让我们首先创建一个具有多个图例的图，在同一图中不进行组合，这样就可以明显看出差异。

例子

# Load Package
library("ggplot2")
 
# Create a DataFrame
data <- data.frame(Xdata = rnorm(6),                       
                   Ydata = rnorm(6),
                   Group1 = c("ld-01", "ld-02", "ld-03",
                              "ld-04", "ld-05", "ld-06"),
                    
                   Group2 = c("ld-01", "ld-02", "ld-03",
                              "ld-04", "ld-05", "ld-06"))
 
# Create a Scatter Plot With Multiple Legends
ggplot(data, aes(Xdata, Ydata, color = Group1, shape = Group2)) +  
  geom_point(size = 7)

输出

在R语言中合并多个ggplot2图例

带有多个图例的散点图

正如你所看到的，在上面的图中，两个图例第一组代表颜色，第二组代表散点图中的点的形状，它们的轮廓是不同的。为了将它们合并成一个图例，我们应该在两个图例中只选择一个。这里我们选择了Group2，所以我们将Group2分配给ais()函数的颜色和形状参数。你也可以选择Group1。

例子

# Load Package
library("ggplot2")
 
# Create a DataFrame
data <- data.frame(Xdata = rnorm(6),                       
                   Ydata = rnorm(6),
                   Group1 = c("ld-01", "ld-02", "ld-03",
                              "ld-04", "ld-05", "ld-06"),
                    
                   Group2 = c("ld-01", "ld-02", "ld-03",
                              "ld-04", "ld-05", "ld-06"))
 
# Create a Scatter Plot with Combined
# multiple legends
ggplot(data, aes(Xdata, Ydata, color = Group2, shape = Group2)) +  
  geom_point(size = 7)