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)
输出
带有多个图例的散点图
正如你所看到的,在上面的图中,两个图例第一组代表颜色,第二组代表散点图中的点的形状,它们的轮廓是不同的。为了将它们合并成一个图例,我们应该在两个图例中只选择一个。这里我们选择了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)
输出
结合多个图例的散点图