绘图布局

生信喵

一、mfrow布局

1. #mfrow或者mfcol
   
2. par('mfrow')
   
3. par('mfcol')
   
4. opar <- par(no.readonly = TRUE)#将可以修改的变量储存起来
   
5. par(mfrow=c(2,2))
   
6. par('mfrow')
   
7. plot(pressure,col="red",main="Pic 1")
   
8. barplot(table(mtcars$cyl),col = c("red","cyan","orange"),main = "Pic 2")
   
9. hist(rivers,breaks = 30,col = "pink",main = "Pic 3")
   
10. pie(c(1,3,4,2),labels = c("A","B","C","D"),main = "Pic 4")
    
11. 
    
12. par(mfrow=c(2,2))
    
13. layout.show(4)
    
14. 
    
15. par(mfcol=c(2,2))
    
16. layout.show(4)#与上面的不同，1234摆放位置不同
    
17. 
    
18. par(mfrow=c(1,2))#1行2列
    
19. barplot(1:6)
    
20. pie(1:6)
    
21. par(mfrow=c(2,1))#2行1列
    
22. barplot(1:6)
    
23. hist(rivers)
    
24. par(mfrow=c(2,3))#2行3列
    
25. layout.show(6)
    
26. hist(rivers)
    
27. hist(rivers)
    
28. hist(rivers)
    
29. hist(rivers)
    
30. hist(rivers)
    
31. hist(rivers)
    
32. 
    
33. par(mfrow=c(2,1))#2行1列
    
34. hist(rivers)
    
35. barplot(1:6)
    
36. #想让上下两张图离得近些
    
37. layout.show(2)
    
38. par('mar')
    
39. par(opar)
    
40. # 5.1 4.1 4.1 2.1
    
41. par(mfrow=c(2,1))#2行1列
    
42. par(mar=c(5.1,4.1,4.1,2.1))
    
43. hist(rivers)
    
44. par(mar=c(5.1,4.1,0,2.1))
    
45. barplot(1:6)#画图前调整下左上右
    
46. 
    
47. par(mfrow=c(2,2))#2行2列
    
48. layout.show(4)
    
49. par('mar')
    
50. par(mar=c(0,4.1,4.1,2.1))
    
51. hist(rivers)#贴着下边
    
52. par(mar=c(5.1,0,4.1,2.1))
    
53. barplot(1:6)#贴着左边
    
54. par(mar=c(5.1,4.1,0,2.1))
    
55. hist(rivers)#贴着上边
    
56. par(mar=c(5.1,4.1,4.1,0))
    
57. hist(rivers)#贴着右边
    
58. #以上都是规整的布局

复制代码

      
       2行2列
      
       1行2列
      
       2行1列

二、layout 布局

1. layout(mat = matrix(c(1,2,3,4)))
   
2. layout.show(4)
   
3. layout(mat = matrix(c(1,2,3,4),nrow=2,byrow=T))
   
4. matrix(c(1,2,3,4),nrow=2)
   
5. matrix(c(1,2,3,4),nrow=2,byrow=T)#绘图位置不同
   
6. layout.show(4)
   
7. hist(rivers)
   
8. plot(women)
   
9. barplot(1:6)
   
10. pie(1:6)
    
11. 
    
12. matrix(c(1,1,2,3),nrow=2,byrow=T)
    
13. layout(mat = matrix(c(1,1,2,3),nrow=2,byrow=T))
    
14. layout.show(3)
    
15. hist(rivers)
    
16. plot(women)
    
17. barplot(1:6)
    
18. 
    
19. matrix(c(1,2,1,3),nrow=2,byrow=T)
    
20. layout(mat = matrix(c(1,2,1,3),nrow=2,byrow=T))
    
21. layout.show(3)
    
22. hist(rivers)
    
23. plot(women)
    
24. barplot(1:6)
    
25. 
    
26. matrix(c(1,0,0,2,2,0,3,3,3),nrow=3,byrow=T)
    
27. layout(matrix(c(1,0,0,2,2,0,3,3,3),nrow=3,byrow=T))
    
28. layout.show(3)
    
29. hist(rivers)
    
30. plot(women)
    
31. barplot(1:6)
    
32. 
    
33. layout(matrix(c(1,1,2,3),nrow=2,byrow=T))
    
34. layout.show(3)
    
35. layout(matrix(c(1,1,2,3),nrow=2,byrow=T),width = c(2,1))
    
36. layout.show(3)
    
37. layout(matrix(c(1,1,2,3),nrow=2,byrow=T),width = c(2,1),heights = c(1,2))
    
38. layout.show(3)#调整组分高度和宽度

复制代码

      
       layout可调整不规整布局
      
       layout可调整不规整布局
      
       layout可调整不规整布局