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="年龄箱线图")

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)
相关推荐
星夜离尘564 小时前
MATLAB 工程实验:不等间隔流量积分,先把缺口与覆盖率说清楚
开发语言·matlab·时间戳·数据质量·数值积分
Ai-_Man5 小时前
Meta Muse还是不可以导出左侧所有对话,只能点进去单条内容导出,方法不对吗?
开发语言·人工智能·ai·小程序·c#·1024程序员节
梓豪csd5 小时前
消息订阅中心:谁该收到哪条通知
java·开发语言·人工智能·低代码·自动化·1024程序员节
学逆向的5 小时前
C 枚举变量
c语言·开发语言·网络安全
Sakura_j_h_5 小时前
Python 在定时任务里输出 emoji,UnicodeEncodeError 从哪来
开发语言·字符编码·windows·python·定时任务
不脱发的程序猿6 小时前
纳指ETF量化策略
数据库·人工智能·1024程序员节
程序员塔塔喵7 小时前
【MySQL篇|第一篇】索引失效的情况
数据库·mysql·索引失效
北京青蓝智慧马老师8 小时前
比外部黑客更难防的,是那个有权限的自己人(3 个脱敏复盘)
大数据·数据库·人工智能
笃行3508 小时前
拆一台数据集成产品:KFS 的骨架、肌肉和神经
数据库
4SAPI8 小时前
搭建 AI 数据分析工具大模型 API 选型指南
数据库·人工智能·架构·php·1024程序员节