APP下载

R语言的图形边框

2019-04-24耿秀华冀建平

中国科技纵横 2019年5期
关键词:R语言

耿秀华 冀建平

摘 要:图形是R的一个强大功能,软件包graphics是R标准发布版的一部分,它包含许多有用的函数以创建各种图形显示,R的绘图命令包含高级绘图命令和低级绘图命令两种,其中的高级绘图函数有一些公用的图形参数,本文介绍了R中图形边框bty的设置方式,并绘图说明了各种图形边框的差异。

关键词:R语言;图形边框;bty;参数

中图分类号:TP312 文献标识码:A 文章编号:1671-2064(2019)05-0049-02

1 图形边框

R语言中的高级绘图函数有一些公用的图形参数,本文介绍用来设置图形边框的参数bty,bty是字符型参数,赋值时需加双引号,它共有7种选择:bty=“o”表示图形边框是四周边框,即上、下、左、右都有边框,它是缺省值,也就是说图形边框默认为四周边框;bty=“l”表示图形边框是左下边框,左边和下边有边框;bty=“7”表示图形边框是右上边框,右边和上边有边框;bty=“c”表示上边、下边及左边有边框;将bty设置为“u”时,左边、右边以及下边有边框;将bty设置为“]”时,上边、下边以及右边有边框;bty=“n”时无任何边框,如表1所示。

表1 图形边框参数bty

2 设置图形边框

下面我们通过例子来比较一下不同的图形边框,体会参数bty的作用。

2.1 o型邊框

在R中输入以下命令:

>a2015<-c(10,33,67,80,333,450)

>a2016<-c(21,35,78,93,490,610)

>bike<-rbind(a2015,a2016)

>colnames(bike)<-c("一年级","二年级","三年级","四年级","五年级","六年级")

>library(RColorBrewer)

>col<-colorRampPalette(brewer.pal(9,"Blues"))(12)

>barplot(bike,main="某小学2015年、2016年各年级自行车数量(邻接条形图)",col=col,beside

=TRUE)

>box(bty="o")

所绘图形如图1所示,它是一个邻接条形图,图中设置bty="o",图形边框为四周型,即上、下、左、右四周都有边框,这是缺省边框类型。

2.2 l型边框

在R中输入以下命令:

>num<-500

>n<-100

>p<-0.3

>bino<-rbinom(num,n,p)

>library(RColorBrewer)

>mycol<-colorRampPalette(brewer.pal(9,"Blues"))(11)

>hist(bino,main="二项分布直方图B(100,0.3)",col=mycol)

>box(bty="l")

所绘图形如图2所示,图中设置bty="l"即图形边框为l型,图形在左侧和下侧有边框。

2.3 7型边框

在R中输入以下命令:

>a<-seq(1,50)

>b<-rnorm(50)

>par(bg="cornsilk")

>plot(a,b,pch=21,col="red",cex=2, bg="yellow", bty="7")

所绘图形如图3所示,图中设置bty="7",在图形的上侧和右侧有边框,注意下侧和左侧的是坐标轴,不是图形边框。

2.4 u型边框

在R中输入以下命令:

>par(bty="u")

>x <- stats::rnorm(50)

>xr <- round(x, 1)

>stripchart(x,main="三种方式对比",col=2)

>stripchart(xr, method = "stack", add = TRUE, at = 1.2,col=3)

>stripchart(xr, method = "jitter", add = TRUE, at = 0.7,col=5)

>stripchart(xr, method = "jitter", add = TRUE, at = 0.7,col=5)

所绘图形如图4所示,图中设置bty="u",这是u型边框,左、右及下边有边框。

2.5 ]型边框

在R中输入以下命令:

>par(bty="]")

>library(RColorBrewer)

>score<-replicate(10,rnorm(75,75,sd=2))

>boxplot(score,bty="7",col=brewer.pal(10,"Paired"))

所绘图形如图5所示,图中设置bty="]",这是]型边框, 上、下及右边有边框。

参考文献

[1] Emmanuel Paradis.R语言初学者指南[M].Institut des Sciences de lEvolution Universit′e Montpellier II F-34095 Montpellier c′edex 2005.

[2] R Development Core Team.R语言简介[M].2006.

[3] 张金龙.R语言初步-数据处理、绘图与编程[R].2010.

猜你喜欢

R语言
基于R语言的学生成绩分析
基于GPS轨迹数据进行分析改善城市交通拥挤
基于R语言的Moodle平台数据挖掘技术的研究
注重统计思维培养与应用为主导的生物统计学课程建设