引入d.class进行画图
> d.class<-read.csv("D://class.csv",header = T)
> attach(d.class)
> opar<-par(no.readonly = TRUE)
非常简单的数据，需要可自取
1.par()函数进行画布布局
//画布被分为4个格子 par(mfrow=c(2,2))
分布四个图型
> plot(age,height,main="身高随年龄变化") > plot(age,weight,main="体重随年龄变化") > hist(age,main="年龄柱状图") > boxplot(age,main="年龄箱线图")
2.layout()函数
> layout(matrix(c(1,1,2,3),2,2,byrow=TRUE)) #1表示第一个图形，2表示第二个图形 > hist(age) > hist(weight) > hist(height)
> 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)
3.par( fig=c() )的设置:其中c的参数如下
> par(fig=c(0,0.8,0,0.8)) > plot(age,weight,xlab = "年龄",ylab = "体重")
#上一个图形消失了，除非par(fig=c(0,0.8,0,0.8),new=TRUE) > par(fig=c(0,0.8,0,0.8)) > boxplot(age,axes=FALSE)
