R语言基础培训第三讲R绘图.ppt

《R语言基础培训第三讲R绘图.ppt》由会员分享，可在线阅读，更多相关《R语言基础培训第三讲R绘图.ppt（48页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、R R绘图基基础2021/9/261demo(graphics)demo(graphics)R R绘图演示：演示：2021/9/2622021/9/2632021/9/2642021/9/265R R绘图特点：自由特点：自由2021/9/2662.2.常用常用绘图函数函数2.1 par()和和 plot()2.2 图形元素形元素2.3 常用常用图形形绘制制2021/9/2672.1 par()2.1 par()和和 plot(.)plot(.)par()的功能的功能：用来：用来设置或者置或者获取取图形参数形参数 特点特点：设置后置后图形参数永久改形参数永久改变，除非关，除非关闭绘图窗口窗口参数

2、参数：可以：可以进行行70多种参数多种参数设置，分置，分为两两类：1.仅能由能由par()函数函数进行行设置的参数置的参数；2.也可以由其他也可以由其他绘图函数函数进行行设置置的参数。的参数。输入入par()可以可以查看看par函数所能函数所能设置的参数列表置的参数列表 2021/9/268par()par()常用参数常用参数详解解bg 设置置图形背景色形背景色bty 设置置图形形边框框样式；取式；取值为字符字符o,l,7,c,u,之一之一 plot(1:10)plot(1:10)par(bg=red)par(bg=red)plot(1:10)plot(1:10)par(bty=u)par(b

3、ty=u)plot(1:10)plot(1:10)par(bty=l)par(bty=l)plot(1:10)plot(1:10)2021/9/269par()par()常用参数常用参数详解解cex 图上元素（文本和符号等）的上元素（文本和符号等）的缩放倍数放倍数cex.axis 坐坐标轴刻度刻度标记的的缩放倍数放倍数cex.lab 坐坐标轴标题的的缩放倍数放倍数cex.main 图主主标题的的缩放倍数放倍数cex.sub 图副副标题的的缩放倍数放倍数 plot(1:10,xlab=AGB,ylab=Species plot(1:10,xlab=AGB,ylab=Species richnes

4、s,pch=16,main=SPAGB,richness,pch=16,main=SPAGB,sub=GTS plot)sub=GTS plot)par(cex=1.5,cex.lab=1.5,cex.axis=1.5,par(cex=1.5,cex.lab=1.5,cex.axis=1.5,cex.main=1.5,cex.sub=1.5)cex.main=1.5,cex.sub=1.5)plot(1:10,xlab=AGB,ylab=Species plot(1:10,xlab=AGB,ylab=Species richness,pch=16,main=SPAGB,richness,pch

5、=16,main=SPAGB,sub=GTS plot)sub=GTS plot)2021/9/2610par()par()常用参数常用参数详解解colcol 图中符号（点、中符号（点、线等）的等）的颜色色col.axiscol.axis 坐坐标轴刻度刻度标记的的颜色色col.labcol.lab 坐坐标轴标题的的颜色色col.maincol.main 图主主标题的的颜色色col.subcol.sub 图副副标题的的颜色色用用colors()colors()函数可以函数可以查看看R R所能所能设置的置的600600多多种种颜色色 plot(1:10,xlab=AGB,ylab=Species

6、plot(1:10,xlab=AGB,ylab=Species richness,pch=16,main=SPAGB,richness,pch=16,main=SPAGB,sub=GTS plot)sub=GTS plot)par(col=red,col.lab=brown,par(col=red,col.lab=brown,col.axis=green,col.main=yellow,col.axis=green,col.main=yellow,col.sub=pink)col.sub=pink)plot(1:10,xlab=AGB,ylab=Species plot(1:10,xlab=A

7、GB,ylab=Species richness,pch=16,main=SPAGB,richness,pch=16,main=SPAGB,sub=GTS plot)sub=GTS plot)2021/9/2611par()par()常用参数常用参数详解解font font 设置文本字体置文本字体样式；取式；取值为一个整数；一个整数；1 1、2 2、3 3、4 4分分别表示正常、表示正常、粗体、斜体和粗斜体粗体、斜体和粗斜体font.axisfont.axis 坐坐标轴刻度刻度标签的字体的字体样式式font.labfont.lab 坐坐标轴标题的字体的字体样式式font.main font.m

8、ain 图主主标题的字体的字体样式式font.subfont.sub 图副副标题的字体的字体样式式 plot(1:10,xlab=AGB,ylab=Species plot(1:10,xlab=AGB,ylab=Species richness,pch=16,main=SPAGB,richness,pch=16,main=SPAGB,sub=GTS plot)sub=GTS plot)par(font=1,font.axis=2,par(font=1,font.axis=2,font.lab=3,font.main=4,font.sub=1)font.lab=3,font.main=4,fon

9、t.sub=1)plot(1:10,xlab=AGB,ylab=Species plot(1:10,xlab=AGB,ylab=Species richness,pch=16,main=SPAGB,richness,pch=16,main=SPAGB,sub=GTS plot)sub=GTS plot)2021/9/2612par()par()常用参数常用参数详解解 plot(1:10,xlab=AGB,ylab=Species plot(1:10,xlab=AGB,ylab=Species richness,pch=16,main=SPAGB,richness,pch=16,main=SPA

10、GB,sub=GTS plot)sub=GTS plot)familyfamily 设置文本的字体族（置文本的字体族（衬线、无、无衬线、等、等宽、符号字体等）、符号字体等）标准取准取值有：有：serif,sans,mono,symbolserif,sans,mono,symbolpar(family=mono)par(family=mono)plot(1:10,xlab=AGB,ylab=Species plot(1:10,xlab=AGB,ylab=Species richness,pch=16,main=SPAGB,richness,pch=16,main=SPAGB,sub=GTS pl

11、ot)sub=GTS plot)2021/9/2613par()par()常用参数常用参数详解解laslas 坐坐标轴标签样式，取式，取0 0、1 1、2 2、3 3四个整数之一，表示四个整数之一，表示“总是平行于坐是平行于坐标轴”、“总是水平是水平”、“总是垂直于坐是垂直于坐标轴”和和“总是是竖直直”plot(1:10,xlab=AGB,ylab=Species plot(1:10,xlab=AGB,ylab=Species richness,pch=16,main=SPAGB,richness,pch=16,main=SPAGB,sub=GTS plot)sub=GTS plot)par(

12、las=1)par(las=1)plot(1:10,xlab=AGB,ylab=Species plot(1:10,xlab=AGB,ylab=Species richness,pch=16,main=SPAGB,richness,pch=16,main=SPAGB,sub=GTS plot)sub=GTS plot)2021/9/2614par()par()常用参数常用参数详解解pchpch 点的符号点的符号,用用125125的数字表示（的数字表示（21252125可以填充可以填充颜色），也可以用任意字符表示。色），也可以用任意字符表示。par(pch=15)par(pch=15)对应的符号

13、就是：的符号就是：par(pch=“A”)par(pch=“A”)对应的符号就是：的符号就是：A A2021/9/2615par()par()常用参数常用参数详解解 plot(1:10,type=l)plot(1:10,type=l)par(lty=2,lwd=3)par(lty=2,lwd=3)plot(1:10,type=l)plot(1:10,type=l)lty lty 线条虚条虚实样式式可以可以设置置为：0 0 不画不画线，1 1 实线，2 2 虚虚线，3 3 点点线，4 4 点划点划线，5 5 长划划线，6 6 点点长划划线；或者相；或者相应设置如下字符串：置如下字符串：blank

14、,solid,dashed,blank,solid,dashed,dotted,dotdash,longdash,twodashdotted,dotdash,longdash,twodash；还可以可以用由十六用由十六进制的数字制的数字组成的字符串表示成的字符串表示线上上实线和空白的相和空白的相应长度，如度，如F8F8lwdlwd 线条条宽度；默度；默认为1 12021/9/2616par()par()常用参数常用参数详解解 plot(1,type=n)plot(1,type=n)text(1,1,R Graphics,cex=2)text(1,1,R Graphics,cex=2)srt s

15、rt 字符串的旋字符串的旋转角度，取一个角度数角度，取一个角度数值 par(srt=45)par(srt=45)plot(1,type=n)plot(1,type=n)text(1,1,R Graphics,cex=2)text(1,1,R Graphics,cex=2)2021/9/2617par()par()常用参数常用参数详解解mar 设置置图形形边界空白界空白宽度；度；按照按照“下、左、上、右下、左、上、右”的的顺序，默序，默认值为c(5,4,4,2)par(mfrow=c(2,2),mar=c(2,2,2,2)par(mfrow=c(2,2),mar=c(2,2,2,2)plot(1

16、);plot(1);plot(1);plot(1)plot(1);plot(1);plot(1);plot(1)par(mfrow=c(2,2)par(mfrow=c(2,2)plot(1);plot(1);plot(1);plot(1)plot(1);plot(1);plot(1);plot(1)2021/9/2618par()par()常用参数常用参数详解解xaxs 和和 yaxs 坐坐标轴范范围的的计算方式算方式默默认为r：先把原始数据的范：先把原始数据的范围向外向外扩大大4%，然后用，然后用这个范个范围画坐画坐标轴；另外；另外一种取一种取值i表示直接使用原始数据范表示直接使用原始数据范

17、围 par(xaxs=i,yaxs=i)par(xaxs=i,yaxs=i)plot(1:10,cex=2,pch=15,xlim=c(0,10),plot(1:10,cex=2,pch=15,xlim=c(0,10),ylim=c(0,10)ylim=c(0,10)plot(1:10,cex=2,pch=15,xlim=c(0,plot(1:10,cex=2,pch=15,xlim=c(0,10),ylim=c(0,10)10),ylim=c(0,10)2021/9/2619plot(x,y,.)plot(x,y,.)常用参数常用参数typetype 图形形样式式类型，可取型，可取值：p l

18、 b c o h s S n p l b c o h s S n，分，分别代表不同代表不同的的图形形样式式此外能使用此外能使用 par()par()参数中的大部分参数中的大部分 参数参数设置，如置，如设置置颜色，大小，色，大小，图标.main main 主主标题；subsub 副副标题；xlab xlab x x轴标题；ylab ylab y y轴标题aspasp 图形形纵横横轴比例比例y/xy/xxlim,ylim xlim,ylim 设置坐置坐标系的界限系的界限loglog 坐坐标是否取是否取对数，数，T T或或F Faxesaxes 是否画坐是否画坐标轴，T T或或F F frame.p

19、lot frame.plot 是否是否给图形加框，形加框，T T或或F F2021/9/2620plot()plot()练习(10(10分分钟)data=runif(10)#随机产生10个数 plot(x=data)#默认方式画图，输入数据为一个向量 plot(x=data,y=data2)#对输入成对的数据进行画图 plot(data,xlab=AGB,ylab=SP,main=AGBSP,sub=GTS)#添加标签 plot(data,col=red)#设置图标颜色 plot(data,col=red,pch=16)#更改图标的类型 plot(data,col=red,pch=16,cex

20、=3)#更改图标的大小 plot(data,type=l)#更改 type 类型为画线 plot(data,type=l,lwd=2)#更改线条的宽度 plot(data,type=l,lwd=2,lty=4)#更改线条的类型 plot(data,type=l,ylim=c(0.4,0.7)#限制y轴的范围 plot(data,type=l,frame.plot=F)#不画边框2021/9/26212.2 2.2 图形基本元素形基本元素(低低级绘图函数函数)点点 points()线-折折线lines()、直、直线abline()、线段段segments()、曲、曲线curve()面面-矩形矩形

21、 rect()box()、多、多边形形 polygon()文本文本text()mtext()title()坐坐标轴 axis()网格网格线grid()图例例 legend()2021/9/2622添加点添加点 points(x,y.)points(x,y.)points(x,y=NULL,.)points(x,y=NULL,.)x,y x,y 设置点的坐置点的坐标位置，其他参数位置，其他参数设置大部分同置大部分同 par()par()的参数的参数设置置练习练习（5 5分钟）分钟）plot(5,xlim=c(0,10),ylim=c(0,10),type=n)plot(5,xlim=c(0,10

22、),ylim=c(0,10),type=n)#绘制底制底图 points(6,5)points(6,5)#添加点添加点 points(5,5,pch=15)points(5,5,pch=15)#更改点的更改点的图标 points(4,5,pch=15,col=green)points(4,5,pch=15,col=green)#更改点的更改点的颜色色 points(3,5,pch=15,col=green,cex=3)points(3,5,pch=15,col=green,cex=3)#更改点的大小更改点的大小 data=data.frame(x=1:10,b=runif(2,8,10)dat

23、a=data.frame(x=1:10,b=runif(2,8,10)#产生数据框数据生数据框数据 points(data$x,data$y,pch=6,col=blue,cex=3)points(data$x,data$y,pch=6,col=blue,cex=3)#添加多个点添加多个点2021/9/2623添加直添加直线 abline(.)abline(.)abline(a=NULL,b=NULL,h=NULL,v=NULL,reg=NULL.)a a 截距，截距，b b 斜率，斜率，h h是画水平是画水平线时的的纵轴值，v v 是画垂直是画垂直线时的横的横轴值，reg reg 是一个能用

24、函数是一个能用函数coef()coef()提取系数（包含斜率和截距）的提取系数（包含斜率和截距）的R R对象，如提取象，如提取线性回性回归生生成的成的对象象练习练习（5 5分钟）分钟）data=data.frame(x=1:10,y=runif(10)data=data.frame(x=1:10,y=runif(10)#产生生1 1个数据框数据个数据框数据 plot(data,ylim=c(-1,1)plot(data,ylim=c(-1,1)#绘制底制底图 model=lm(yx,data=data)model=lm(yx,data=data)#线性回性回归 abline(model)abl

25、ine(model)#将回将回归线添加到添加到图中中 abline(v=6,h=0,lwd=2,col=red)abline(v=6,h=0,lwd=2,col=red)#在在x x为6 6和和y y为0 0处各添加各添加一条一条颜色色为红色，粗度色，粗度为2 2的直的直线 abline(a=-1,b=0.1,lwd=2,lty=2)abline(a=-1,b=0.1,lwd=2,lty=2)#添加一条截距添加一条截距为-1-1，斜，斜率率为0.10.1的虚的虚线2021/9/2624添加添加线段段 segments()segments()segments(x0,y0,x1,y1,.)segm

26、ents(x0,y0,x1,y1,.)x0,y0,x1,y1 x0,y0,x1,y1 设置置线段起点和段起点和终点的坐点的坐标练习练习（4 4分钟）分钟）plot(5,xlim=c(0,10),ylim=c(0,10),type=n)#绘制底制底图 segments(2,2,8,8,lwd=2,col=green)#添加起始坐添加起始坐标为（2,2）终点坐点坐标为（8,8），），颜色色为绿色，粗度色，粗度为2 的的线段段 segments(2,1,8,7,lwd=2,lty=2)#更改更改线的的类型型2021/9/2625添加矩形添加矩形 rect()rect()和和box()box()rec

27、t(xleft,ybottom,xright,ytop,density=NULL,angle=45,col=NA,border=NULL,rect(xleft,ybottom,xright,ytop,density=NULL,angle=45,col=NA,border=NULL,lty,lwd.)lty,lwd.)xleft,ybottom,xright,ytop xleft,ybottom,xright,ytop 分分别制定左下角和右上角的坐制定左下角和右上角的坐标，用来确定矩形的位置，用来确定矩形的位置densitydensity 设置阴影置阴影线的填充密度的填充密度.当当设为一个正一个

28、正值时，那么，那么颜色填充参数色填充参数colcol将失效，将失效，只有当它被只有当它被设为负数或数或NANA或或NULLNULL时才可以填充才可以填充颜色色angle angle 设置填充置填充线条的角度，默条的角度，默认为4545度度borderborder 设置置边框框颜色，若色，若设置置为FALSEFALSE或或NANA，那么将不画，那么将不画边框框练习练习（8 8分钟）分钟）box(.)box(.)专用于用于给图形添加外形添加外边框框lty lty 和和 lwdlwd 分分别设定定边框和填充框和填充线的的类型和粗度型和粗度 plot(5,xlim=c(0,10),ylim=c(0,1

29、0),type=n)plot(5,xlim=c(0,10),ylim=c(0,10),type=n)#绘制底制底图 rect(1,1,3,3)rect(1,1,3,3)#添加一个矩形添加一个矩形 rect(3,3,6,6,density=8)rect(3,3,6,6,density=8)#填充填充线密度密度设置置为8 8根根 rect(6,6,9,9,density=8,angle=15)rect(6,6,9,9,density=8,angle=15)#填充填充线倾斜度斜度设置置为1515度度 rect(1,7,4,9,col=grey)rect(1,7,4,9,col=grey)#灰色填充灰

30、色填充 rect(1,7,4,9,col=grey,border=red)rect(1,7,4,9,col=grey,border=red)#矩形矩形边框框设置置为红色色 rect(1,7,4,9,col=grey,border=red,lwd=3)rect(1,7,4,9,col=grey,border=red,lwd=3)#将矩形将矩形边框加粗框加粗 box(lwd=3)box(lwd=3)#给整个整个图加一个粗度加一个粗度为3 3的外的外边框框2021/9/2626添加文本添加文本 text(),title()text(),title()和和mtext()mtext()title(mai

31、n=NULL,sub=NULL,xlab=NULL,ylab=NULL,line=NA,.)title(main=NULL,sub=NULL,xlab=NULL,ylab=NULL,line=NA,.)用于添加用于添加标签main,sub,xlab,ylab main,sub,xlab,ylab 设置主、副、置主、副、x x轴、y y轴的的标题line line 设置置 文本与文本与图形形边缘的距离的距离text(x,y,labels,.)text(x,y,labels,.)用于在用于在绘图区域添加文本区域添加文本x,y x,y 设置添加文本的位置置添加文本的位置 labelslabels 设

32、置添加的文本内容置添加的文本内容mtext(text,side=3,line=0,.)用于在用于在绘图框框边缘添加文本添加文本text 添加的文本内容添加的文本内容 side 表示表示边框位置，可框位置，可选择1，2，3，4练习练习（5 5分钟）分钟）plot(1:10)plot(1:10)#绘制底制底图 title(main=AGBSP,line=1)title(main=AGBSP,line=1)#添加主添加主标题 text(6,4,labels=R Graphics,srt=45,cex=2,font=2)text(6,4,labels=R Graphics,srt=45,cex=2,f

33、ont=2)#添加文添加文本，并旋本，并旋转4545度，放大度，放大2 2倍，粗体倍，粗体 mtext(text=R side text,side=4)mtext(text=R side text,side=4)#在在绘图框外添加文本框外添加文本2021/9/2627添加坐添加坐标轴axis()axis()axis(side,at=NULL,labels=TRUE,.)axis(side,at=NULL,labels=TRUE,.)side side 添加坐添加坐标轴的位置，可的位置，可选值有有1 1，2 2，3 3，4 4at at 制定坐制定坐标轴上刻度出上刻度出现的位置的位置labels

34、 labels 设定刻度出定刻度出现位置的位置的标签练习练习（1010分钟）分钟）op=par()op=par()#将默将默认的的parpar设置保存置保存 par(mfrow=c(1,2)par(mfrow=c(1,2)#设置置parpar，绘制一制一页多多张图 plot(1:12,rnorm(12),xlab=,ylab=,axes=F,pch=18,cex=1.5,col=green)plot(1:12,rnorm(12),xlab=,ylab=,axes=F,pch=18,cex=1.5,col=green)axis(side=1,at=1:12,labels=LETTERS1:12,

35、col.axis=blue)axis(side=1,at=1:12,labels=LETTERS1:12,col.axis=blue)#添加坐添加坐标轴 box()box()#添加外添加外边框框 plot(1:12,rnorm(12),xlab=,ylab=,axes=F,pch=18,cex=1.5,col=green)plot(1:12,rnorm(12),xlab=,ylab=,axes=F,pch=18,cex=1.5,col=green)axis(side=1,at=seq(2,12,by=2),labels=LETTERS1:6,col.axis=red)axis(side=1,a

36、t=seq(2,12,by=2),labels=LETTERS1:6,col.axis=red)#添加坐添加坐标轴 注意放大注意放大绘图窗口窗口查看看变化化 axis(2)axis(2)box()box()par(op)par(op)#回复默回复默认的的parpar设置置2021/9/2628添加网格添加网格线grid()grid()练习练习（3 3分钟）分钟）plot(300,type=n,xlab=,ylab=,xlim=c(1,600),plot(300,type=n,xlab=,ylab=,xlim=c(1,600),ylim=c(1,400),xaxs=i,yaxs=i)ylim=c

37、(1,400),xaxs=i,yaxs=i)grid(nx=30,ny=20,col=red)grid(nx=30,ny=20,col=red)grid(nx=6,ny=4,col=black,lty=1,lwd=2)grid(nx=6,ny=4,col=black,lty=1,lwd=2)box(lwd=2)box(lwd=2)grid(nx=NULL,ny=nx,.)grid(nx=NULL,ny=nx,.)nxnx 和和 ny ny 分分别表示横表示横纵轴上网格上网格线的条数的条数2021/9/2629添加添加图例例 legend()legend()plot(1:8,type=n,xli

38、m=c(0,10)plot(1:8,type=n,xlim=c(0,10)segments(c(2,6),c(2,6),c(6,10),c(6,2),lty=c(1,2),lwd=2)segments(c(2,6),c(2,6),c(6,10),c(6,2),lty=c(1,2),lwd=2)legend(x=0,y=8,legend=c(upwards,downwards),lty=1:2,lwd=2,bty=n)legend(x=0,y=8,legend=c(upwards,downwards),lty=1:2,lwd=2,bty=n)plot(runif(20),pch=16,col=r

39、ed,ylim=c(0,1.2),type=b,lty=1)plot(runif(20),pch=16,col=red,ylim=c(0,1.2),type=b,lty=1)points(runif(40),pch=15,col=green,type=b,lty=2)points(runif(40),pch=15,col=green,type=b,lty=2)legend(x=1,y=1.2,legend=c(red point,green square),pch=16:15,col=c(red,legend(x=1,y=1.2,legend=c(red point,green square)

40、,pch=16:15,col=c(red,green),lty=1:2)green),lty=1:2)plot(1:8,type=n,xlab=,ylab=,xlim=c(0,10)plot(1:8,type=n,xlab=,ylab=,xlim=c(0,10)rect(c(2,6),c(0,0),c(4,8),c(5,7),col=2:3)rect(c(2,6),c(0,0),c(4,8),c(5,7),col=2:3)legend(x=0,y=8,legend=c(red,green),fill=2:3,bty=n)legend(x=0,y=8,legend=c(red,green),fi

41、ll=2:3,bty=n)box(lwd=2)box(lwd=2)练习练习（1010分钟）分钟）legend(x,y=NULL,legend,fill,lty,pch,lwd,angle,density,bty=n.)legend(x,y=NULL,legend,fill,lty,pch,lwd,angle,density,bty=n.)x x y y 表示表示图例的坐例的坐标位置（位置（bottomrigt,bottom,bottomleft,left,topleft,top,topright,rightbottomrigt,bottom,bottomleft,left,topleft,to

42、p,topright,right）legendlegend 设置置图例中的文字例中的文字说明明ltylty、lwdlwd和和 pch pch 指定指定图例中点例中点线的的样式，式，设置与置与图中所画的中所画的图一致一致fillfill、angleangle和和density density 用于填充用于填充类的的图例例设置，如置，如绘图内容内容为条形条形图时用于条形用于条形图的的颜色、色、阴影阴影线、线的的倾斜度等的斜度等的设置置btybty 设置置图例框的例框的样式，式，通常通常设置置为nn，不，不绘制制边框框2021/9/26302.3 2.3 常用常用图形形绘制制 (高高级绘图函数函数)

43、散点散点图 plot()或者或者points()饼图pieplot()直方直方图 hist()条形条形图barplot()箱箱图boxplot()等高等高线图contour()颜色色图image()2021/9/2631饼图 pie()pie()pie(x,labels=names(x),.)pie(x,labels=names(x),.)x x 数数值向量向量labelslabels 设置置标签练习练习（5 5分钟）分钟）pie.sales=c(0.12,0.3,0.26,0.16,0.04,0.12)pie.sales=c(0.12,0.3,0.26,0.16,0.04,0.12)#数据数

44、据 names(pie.sales)=c(Blueberry,Cherry,Apple,Boston names(pie.sales)=c(Blueberry,Cherry,Apple,Boston Cream,Other,Vanilla Cream)Cream,Other,Vanilla Cream)#设置数据置数据标签 pie.col=c(purple,violetred1,green3,cornsilk,cyan,pie.col=c(purple,violetred1,green3,cornsilk,cyan,white)white)#设置置颜色色 pie(x=pie.sales,col

45、=pie.col)pie(x=pie.sales,col=pie.col)#绘制制饼图2021/9/2632直方直方图hist()hist()练习练习（1010分钟）分钟）par(mfrow=c(2,2),mar=c(2,3,2,0.5)par(mfrow=c(2,2),mar=c(2,3,2,0.5)#绘图多多张 data(geyser,package=MASS)data(geyser,package=MASS)#调用数据用数据 hist(geyser$waiting,main=(1)freq=TRUE,xlab=waiting)hist(geyser$waiting,main=(1)fre

46、q=TRUE,xlab=waiting)hist(geyser$waiting,freq=FALSE,xlab=waiting,main=(2)freq=FALSE)hist(geyser$waiting,freq=FALSE,xlab=waiting,main=(2)freq=FALSE)hist(geyser$waiting,breaks=5,density=10,xlab=waiting,main=(3)hist(geyser$waiting,breaks=5,density=10,xlab=waiting,main=(3)breaks=5)breaks=5)hist(geyser$wa

47、iting,breaks=40,col=red,xlab=waiting,main=(4)hist(geyser$waiting,breaks=40,col=red,xlab=waiting,main=(4)breaks=40)breaks=40)hist(x,breaks=Sturges,freq=NULL,probability=!freq,.)hist(x,breaks=Sturges,freq=NULL,probability=!freq,.)x x为欲估欲估计分布的数分布的数值向量；向量；breaksbreaks 设置置计算分段区算分段区间的方法，可以的方法，可以设置置为数字，或其他

48、数字，或其他 （这个参数决定了直方个参数决定了直方图的形状）的形状）freqfreq 和和 probabilityprobability 取取逻辑值T T或者或者F F，前者决定是否以，前者决定是否以频数作数作图，后者决定是否以概率，后者决定是否以概率密度作密度作图，两者互斥，两者互斥2021/9/2633条形条形图barplot()barplot()练习练习（1010分钟）分钟）barplot(height,width=1,space=NULL,names.arg=NULL,legend.text=NULL,beside=barplot(height,width=1,space=NULL,n

49、ames.arg=NULL,legend.text=NULL,beside=FALSE,horiz=FALSE,.)FALSE,horiz=FALSE,.)heightheight 重要参数，它指定了条重要参数，它指定了条图的的长度，度，这个参数可以接受数个参数可以接受数值向量或者一个数据矩向量或者一个数据矩阵（矩（矩阵的列代表的列代表变量，行代表不同量，行代表不同观测值）beside beside 当当heightheight为矩矩阵时起作，起作，besidebeside为TRUETRUE，条，条图并排排列，并排排列，设为FALSEFALSE为堆砌排列堆砌排列widthwidth可以可以设置

50、条的置条的宽度；度；spacespace用以用以设置条之置条之间的的间距；距；names.argnames.arg为条形条形图的的标签legend.text legend.text 用来添加用来添加图例；例；horizhoriz用以用以设置条形置条形图的方向（水平或垂直）的方向（水平或垂直）par(mfrow=c(2,4),mar=c(2,3,2,0.5)par(mfrow=c(2,4),mar=c(2,3,2,0.5)barplot(height=1:3)barplot(height=1:3)#输入入为向量向量时的的图 barplot(height=1:3,col=2:4,space=0.5