Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/70.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 将多个图形合并为一个图形_R_Plot - Fatal编程技术网

R 将多个图形合并为一个图形

R 将多个图形合并为一个图形,r,plot,R,Plot,我想把2个饼图和3个方框图合并成一个图。我想在顶部有2个饼图,在底部有3个方框图。当我使用par(mfrow=c(2,3))时,我在第一行得到了两个饼图和一个方框图 您可以使用布局 像 注 这里您需要创建不同大小的绘图,您需要将布局矩阵划分为最小部分(这里是绘图的1/6) 你需要这样的矩阵(不同的数字-不同的图) 或矩阵(c(1,1,1,2,2,2,3,3,4,4,5,5),nrow=2,ncol=6,byrow=TRUE)您可以使用R中的概念将多个图形绘制成一行或多行和列,请检查以下内容以供

我想把2个饼图和3个方框图合并成一个图。我想在顶部有2个饼图,在底部有3个方框图。当我使用
par(mfrow=c(2,3))
时,我在第一行得到了两个饼图和一个方框图

您可以使用布局

注 这里您需要创建不同大小的绘图,您需要将布局矩阵划分为最小部分(这里是绘图的1/6)

你需要这样的矩阵(不同的数字-不同的图)

矩阵(c(1,1,1,2,2,2,3,3,4,4,5,5),nrow=2,ncol=6,byrow=TRUE)
您可以使用R中的概念将多个图形绘制成一行或多行和列,请检查以下内容以供参考:

plot(1:3)
grid(NA, 5, lwd = 2) # grid only in y-direction

## maybe change the desired number of tick marks:  par(lab = c(mx, my, 7))
op <- par(mfcol = 1:2)
with(iris,
     {
     plot(Sepal.Length, Sepal.Width, col = as.integer(Species),
          xlim = c(4, 8), ylim = c(2, 4.5), panel.first = grid(),
          main = "with(iris,  plot(...., panel.first = grid(), ..) )")
     plot(Sepal.Length, Sepal.Width, col = as.integer(Species),
          panel.first = grid(3, lty = 1, lwd = 2),
          main = "... panel.first = grid(3, lty = 1, lwd = 2), ..")
     }
    )
par(op)
绘图(1:3)
栅格(NA,5,lwd=2)#仅在y方向上栅格
##可能会更改所需的记号数:par(lab=c(mx,my,7))

嗯。。什么意思?你能再解释一下吗?我想把第一个图表示为“a”,第二个图表示为“B”,第三个图表示为“C”等等。图的标题(编辑
main=
of plot)?还是别的?不是头衔。每个图形左侧的图形编号。
     [,1] [,2] [,3] [,4] [,5] [,6]
[1,]    1    1    1    2    2    2
[2,]    3    3    4    4    5    5
plot(1:3)
grid(NA, 5, lwd = 2) # grid only in y-direction

## maybe change the desired number of tick marks:  par(lab = c(mx, my, 7))
op <- par(mfcol = 1:2)
with(iris,
     {
     plot(Sepal.Length, Sepal.Width, col = as.integer(Species),
          xlim = c(4, 8), ylim = c(2, 4.5), panel.first = grid(),
          main = "with(iris,  plot(...., panel.first = grid(), ..) )")
     plot(Sepal.Length, Sepal.Width, col = as.integer(Species),
          panel.first = grid(3, lty = 1, lwd = 2),
          main = "... panel.first = grid(3, lty = 1, lwd = 2), ..")
     }
    )
par(op)