📜  如何在 R 中组合多个 ggplot2 图?

📅  最后修改于: 2022-05-13 01:55:08.076000             🧑  作者: Mango

如何在 R 中组合多个 ggplot2 图?

在本文中,我们将讨论如何在 R 编程语言中组合多个 ggplot2 绘图。

使用“+”号将多个 ggplot2图组合到最终图

在这种组合多个绘图的方法中,用户可以在单个绘图中添加不同类型的绘图或具有不同数据的绘图,用户只需使用“+”号将绘图与每个绘图合并为最终绘图,此外,最终的绘图将是 R 编程语言中单个 ggplot2 绘图中多个绘图的组合。

语法

示例 1:

在此示例中,我们将使用“+”符号形式将 3 个 ggplot2 线图与不同的数据组合在一起,并将它们组合成 R 编程语言中的单个图。

R
# load the package
library("ggplot2")
  
# create dataframe
gfg1 < -data.frame(x=c(4, 5, 1, 7, 8), 
                   y=c(1, 4, 8, 6, 9))
  
# create dataframe
gfg2 < -data.frame(x=c(5, 1, 4, 3, 7),
                   y=c(7, 8, 9, 1, 2))
  
# create dataframe
gfg3 < -data.frame(x=c(4, 8, 6, 3, 5),
                   y=c(3, 4, 5, 8, 7))
  
# plot the data with dataframes with green
# red and blue colors
gfg_plot < -ggplot(NULL, aes(x, y)) + 
geom_line(data=gfg1, col="green") +
geom_line(data=gfg2, col="blue")+
geom_line(data=gfg3, col="red")
  
# display the plot
gfg_plot


R
# load the package
library("ggplot2")
  
# create 5 dataframes
gfg1 < -data.frame(x=c(4, 5, 1, 7, 8), 
                   y=c(1, 4, 8, 6, 9))
gfg2 < -data.frame(x=c(5, 1, 4, 3, 7),
                   y=c(7, 8, 9, 1, 2))
gfg3 < -data.frame(x=c(4, 8, 6, 3, 5), 
                   y=c(3, 4, 5, 8, 7))
gfg4 < -data.frame(x=c(8, 6, 7, 2, 1), 
                   y=c(8, 6, 4, 1, 9))
gfg5 < -data.frame(x=c(6, 1, 6, 5, 4),
                   y=c(6, 8, 7, 6, 4))
  
# plot the data with 5 dataframes
# with 5 different colors
gfg_plot < -ggplot(NULL, aes(x, y)) + 
geom_line(data=gfg1, col="green") +
geom_line(data=gfg2, col="blue")+
geom_line(data=gfg3, col="red")+
geom_point(data=gfg4, col="purple") + 
geom_point(data=gfg5, col="black")
  
# display the plot
gfg_plot


输出:

示例 2:

在这个例子中,我们将结合 3 个 ggplot2 线图和 2 个散点图 ggplot2 共 5 个具有不同数据的图,使用“+”符号形式将它们组合成 R 编程语言中的单个图。

R

# load the package
library("ggplot2")
  
# create 5 dataframes
gfg1 < -data.frame(x=c(4, 5, 1, 7, 8), 
                   y=c(1, 4, 8, 6, 9))
gfg2 < -data.frame(x=c(5, 1, 4, 3, 7),
                   y=c(7, 8, 9, 1, 2))
gfg3 < -data.frame(x=c(4, 8, 6, 3, 5), 
                   y=c(3, 4, 5, 8, 7))
gfg4 < -data.frame(x=c(8, 6, 7, 2, 1), 
                   y=c(8, 6, 4, 1, 9))
gfg5 < -data.frame(x=c(6, 1, 6, 5, 4),
                   y=c(6, 8, 7, 6, 4))
  
# plot the data with 5 dataframes
# with 5 different colors
gfg_plot < -ggplot(NULL, aes(x, y)) + 
geom_line(data=gfg1, col="green") +
geom_line(data=gfg2, col="blue")+
geom_line(data=gfg3, col="red")+
geom_point(data=gfg4, col="purple") + 
geom_point(data=gfg5, col="black")
  
# display the plot
gfg_plot

输出: