R语言图形的组合( par(),layout(),par(fig()) )

引入d.class进行画图

> d.class<-read.csv("D://class.csv",header = T)
> attach(d.class)
> opar<-par(no.readonly = TRUE)

 非常简单的数据,需要可自取

链接:https://pan.baidu.com/s/1zNx5z9JsaaRqFueRgGY3mQ 
提取码:mads

1.par()函数进行画布布局

//画布被分为4个格子
par(mfrow=c(2,2))

分布四个图型 

> plot(age,height,main="身高随年龄变化")
> plot(age,weight,main="体重随年龄变化")
> hist(age,main="年龄柱状图")
> boxplot(age,main="年龄箱线图")

R语言图形的组合( par(),layout(),par(fig()) )_第1张图片

2.layout()函数

> layout(matrix(c(1,1,2,3),2,2,byrow=TRUE))
#1表示第一个图形,2表示第二个图形
> hist(age)
> hist(weight)
> hist(height)

R语言图形的组合( par(),layout(),par(fig()) )_第2张图片

> layout(matrix(c(1,1,2,3),2,2,byrow = TRUE),widths = c(3,1),heights = c(1,1))
#两行两列,列宽为3:1,行高为1:1
> hist(wt)
> hist(mpg)
> hist(disp)

R语言图形的组合( par(),layout(),par(fig()) )_第3张图片

3.par( fig=c() )的设置:其中c的参数如下

R语言图形的组合( par(),layout(),par(fig()) )_第4张图片

> par(fig=c(0,0.8,0,0.8))
> plot(age,weight,xlab = "年龄",ylab = "体重")

R语言图形的组合( par(),layout(),par(fig()) )_第5张图片

#上一个图形消失了,除非par(fig=c(0,0.8,0,0.8),new=TRUE)
> par(fig=c(0,0.8,0,0.8))
> boxplot(age,axes=FALSE)

R语言图形的组合( par(),layout(),par(fig()) )_第6张图片

你可能感兴趣的:(R语言,编程训练,r语言,数据库,开发语言)