《R语言基础培训第三讲R绘图》由会员分享，可在线阅读，更多相关《R语言基础培训第三讲R绘图（48页珍藏版）》请在金锄头文库上搜索。
1、R绘图基基础demo(graphics)R绘图演示：演示：R绘图特点：自由特点：自由2. 常用常用绘图函数函数2.1 par( ) 和和 plot( )2.2 图形元素形元素2.3 常用常用图形形绘制制2.1 par() 和和 plot(.)par( )的功能的功能：用来：用来设置或者置或者获取取图形参数形参数 特点特点：设置后置后图形参数永久改形参数永久改变，除非关，除非关闭绘图窗口窗口参数参数：可以：可以进行行70多种参数多种参数设置，分置，分为两两类：1.仅能由能由par()函数函数进行行设置的参数置的参数 ；2.也可以由其他也可以由其他绘图函数函数进行行设置置的参数。的参数。输入入pa
2、r( )可以可以查看看par函数所能函数所能设置的参数列表置的参数列表 par() 常用参数常用参数详解解bg 设置置图形背景色形背景色bty 设置置图形形边框框样式；取式；取值为字符字符o, l, 7, c, u, 之一之一 plot(1:10) par(bg=red) plot(1:10) par(bty=u) plot(1:10) par(bty=l) plot(1:10)par() 常用参数常用参数详解解cex 图上元素（文本和符号等）的上元素（文本和符号等）的缩放倍数放倍数 坐坐标轴刻度刻度标记的的缩放倍数放倍数 坐坐标轴标题的的缩放倍数放倍数 图主主标题的的缩放倍数放倍数 图副副标
3、题的的缩放倍数放倍数 plot(1:10, xlab=AGB, ylab=Species richness, pch=16, main=SPAGB, sub=GTS plot) par(cex=1.5, cex.lab=1.5, cex.axis=1.5, cex.main=1.5, cex.sub=1.5) plot(1:10, xlab=AGB, ylab=Species richness, pch=16, main=SPAGB, sub=GTS plot)par() 常用参数常用参数详解解col 图中符号（点、中符号（点、线等）的等）的颜色色 坐坐标轴刻度刻度标记的的颜色色 坐坐标轴标题
4、的的颜色色 图主主标题的的颜色色 图副副标题的的颜色色用用colors( )函数可以函数可以查看看R所能所能设置的置的600多种多种颜色色 plot(1:10, xlab=AGB, ylab=Species richness, pch=16, main=SPAGB, sub=GTS plot) par(col=red, col.lab=brown, col.axis=green, col.main=yellow, col.sub=pink) plot(1:10, xlab=AGB, ylab=Species richness, pch=16, main=SPAGB, sub=GTS plot)
5、par() 常用参数常用参数详解解font 设置文本字体置文本字体样式；取式；取值为一个整数；一个整数；1、2、3、4分分别表示正常、表示正常、粗体、斜体和粗斜体粗体、斜体和粗斜体 坐坐标轴刻度刻度标签的字体的字体样式式 坐坐标轴标题的字体的字体样式式font.main 图主主标题的字体的字体样式式 图副副标题的字体的字体样式式 plot(1:10, xlab=AGB, ylab=Species richness, pch=16, main=SPAGB, sub=GTS plot) par(font=1, font.axis=2, font.lab=3,font.main=4,font.sub
6、=1) plot(1:10, xlab=AGB, ylab=Species richness, pch=16, main=SPAGB, sub=GTS plot)par() 常用参数常用参数详解解 plot(1:10, xlab=AGB, ylab=Species richness, pch=16, main=SPAGB, sub=GTS plot)family 设置文本的字体族（置文本的字体族（衬线、无、无衬线、等、等宽、符号字体等）、符号字体等）标准取准取值有：有：serif, sans, mono, symbolpar(family=mono)plot(1:10, xlab=AGB, y
7、lab=Species richness, pch=16, main=SPAGB, sub=GTS plot)par() 常用参数常用参数详解解las 坐坐标轴标签样式，取式，取0、1、2、3四个整数之一，表示四个整数之一，表示“总是平行于坐是平行于坐标轴”、“总是水平是水平”、“总是垂直于坐是垂直于坐标轴”和和“总是是竖直直” plot(1:10, xlab=AGB, ylab=Species richness, pch=16, main=SPAGB, sub=GTS plot) par(las=1) plot(1:10, xlab=AGB, ylab=Species richness, p
8、ch=16, main=SPAGB, sub=GTS plot)par() 常用参数常用参数详解解pch 点的符号点的符号, 用用125的数字表示（的数字表示（2125可以填充可以填充颜色），也可以用任意字符表色），也可以用任意字符表示。示。par(pch=15) 对应的符号就是：的符号就是：par(pch=“A”) 对应的符号就是：的符号就是：Apar() 常用参数常用参数详解解 plot(1:10, type=l) par(lty=2, lwd=3) plot(1:10, type=l)lty 线条虚条虚实样式式可以可以设置置为：0 不画不画线，1 实线，2 虚虚线，3 点点线，4 点划点
9、划线，5 长划划线，6 点点长划划线；或者相；或者相应设置如下字符串：置如下字符串：blank, solid, dashed, dotted, dotdash, longdash, twodash；还可以用由十六可以用由十六进制的数字制的数字组成的字符串表示成的字符串表示线上上实线和空白的相和空白的相应长度，如度，如F8lwd 线条条宽度；默度；默认为1par() 常用参数常用参数详解解 plot(1,type=n) text(1,1, R Graphics, cex=2)srt 字符串的旋字符串的旋转角度，取一个角度数角度，取一个角度数值 par(srt=45) plot(1,type=n)
10、 text(1,1, R Graphics, cex=2)par() 常用参数常用参数详解解mar 设置置图形形边界空白界空白宽度；度；按照按照“下、左、上、右下、左、上、右”的的顺序，默序，默认值为c(5,4, 4, 2) par(mfrow=c(2,2), mar=c(2,2,2,2) plot(1);plot(1);plot(1);plot(1) par(mfrow=c(2,2) plot(1);plot(1);plot(1);plot(1)par() 常用参数常用参数详解解xaxs 和和 yaxs 坐坐标轴范范围的的计算方式算方式默默认为r ：先把原始数据的范：先把原始数据的范围向外向
11、外扩大大4%，然后用，然后用这个范个范围画坐画坐标轴；另外；另外一种取一种取值i表示直接使用原始数据范表示直接使用原始数据范围 par(xaxs=i, yaxs=i) plot(1:10, cex=2, pch=15, xlim=c(0, 10), ylim=c(0,10) plot(1:10, cex=2, pch=15, xlim=c(0, 10), ylim=c(0,10)plot(x, y,.) 常用参数常用参数type 图形形样式式类型，可取型，可取值：p l b c o h s S n ，分，分别代表不同的代表不同的图形形样式式此外能使用此外能使用 par( ) 参数中的大部分参数
12、中的大部分 参数参数设置，如置，如设置置颜色，大小，色，大小，图标.main 主主标题；sub 副副标题；xlab x轴标题；ylab y轴标题asp 图形形纵横横轴比例比例y/xxlim, ylim 设置坐置坐标系的界限系的界限log 坐坐标是否取是否取对数，数，T或或Faxes 是否画坐是否画坐标轴，T或或F frame.plot 是否是否给图形加框，形加框，T或或Fplot() 练习(10分分钟) data=runif(10) #随机产生10个数 plot(x=data) #默认方式画图，输入数据为一个向量 plot(x=data, y=data2) #对输入成对的数据进行画图 plot
13、(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=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(
14、0.4, 0.7) #限制y轴的范围 plot(data, type=l, frame.plot=F) #不画边框2.2 图形基本元素形基本元素(低低级绘图函数函数)点点points( )线-折折线lines ( )、直、直线abline( )、线段段segments()、曲曲线curve( )面面-矩形矩形 rect() box( )、多、多边形形 polygon( )文本文本text( ) mtext( ) title( )坐坐标轴 axis( )网格网格线grid()图例例 legend( )添加点添加点 points(x, y.)points(x, y = NULL, .)x, y 设
15、置点的坐置点的坐标位置，其他参数位置，其他参数设置大部分同置大部分同 par() 的参数的参数设置置练习（5分分钟） plot(5, xlim=c(0,10), ylim=c(0,10), type=n) #绘制底制底图 points(6,5) #添加点添加点 points(5,5, pch=15) #更改点的更改点的图标 points(4,5, pch=15, col=green) #更改点的更改点的颜色色 points(3,5, pch=15, col=green, cex=3) #更改点的大更改点的大小小 data=data.frame(x=1:10, b=runif(2,8,10) #
16、产生数据框数据生数据框数据 points(data$x,data$y, pch=6, col=blue, cex=3) #添加多添加多个点个点添加直添加直线 abline(.)abline(a = NULL, b = NULL, h = NULL, v = NULL, reg = NULL .)a 截距，截距，b 斜率，斜率，h是画水平是画水平线时的的纵轴值，v 是画垂直是画垂直线时的横的横轴值，reg 是一个能用函数是一个能用函数coef()提取系数（包含斜率和截距）的提取系数（包含斜率和截距）的R对象，如提取象，如提取线性回性回归生生成的成的对象象练习（5分分钟）data=data.fra
17、me(x=1:10, y=runif(10) #产生生1个数据框数据个数据框数据 plot(data, ylim=c(-1,1) #绘制底制底图 model=lm(yx, data=data) #线性回性回归 abline(model) #将回将回归线添加到添加到图中中 abline(v=6, h=0, lwd=2, col=red) #在在x为6和和y为0处各各添加一条添加一条颜色色为红色，粗度色，粗度为2的直的直线 abline(a=-1, b=0.1, lwd=2, lty=2) #添加一条截距添加一条截距为-1，斜率斜率为的虚的虚线添加添加线段段 segments( )segments
18、( x0, y0, x1, y1,.)x0, y0, x1, y1 设置置线段起点和段起点和终点的坐点的坐标练习（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) # 更改更改线的的类型型添加矩形添加矩形 rect( ) 和和box( )rect(xleft, ybotto
19、m, xright, ytop, density = NULL, angle = 45, col = NA, border = NULL, lty, lwd.)xleft, ybottom, xright, ytop 分分别制定左下角和右上角的坐制定左下角和右上角的坐标，用来确定矩形的位，用来确定矩形的位置置density 设置阴影置阴影线的填充密度的填充密度. 当当设为一个正一个正值时，那么，那么颜色填充参数色填充参数col将失效，将失效，只有当它被只有当它被设为负数或数或NA或或NULL时才可以填充才可以填充颜色色angle 设置填充置填充线条的角度，默条的角度，默认为45度度border
20、 设置置边框框颜色，若色，若设置置为FALSE或或NA，那么将不画，那么将不画边框框练习（8分分钟）box(.) 专用于用于给图形添加外形添加外边框框lty 和和 lwd 分分别设定定边框和填充框和填充线的的类型和粗度型和粗度 plot(5, xlim=c(0,10), ylim=c(0, 10), type=n) #绘制底制底图 rect(1,1, 3,3) #添加一个矩形添加一个矩形 rect(3,3, 6,6, density=8) # 填充填充线密度密度设置置为8根根 rect(6,6, 9,9, density=8, angle=15) #填充填充线倾斜度斜度设置置为15度度 rec
21、t(1,7, 4,9, col=grey) #灰色填充灰色填充 rect(1,7, 4,9, col=grey, border=red) #矩形矩形边框框设置置为红色色 rect(1,7, 4,9, col=grey, border=red, lwd=3) #将矩形将矩形边框加粗框加粗 box(lwd=3) #给整个整个图加一个粗度加一个粗度为3的外的外边框框添加文本添加文本 text( ) ,title ( ) 和和mtext( )title(main = NULL, sub = NULL, xlab = NULL, ylab = NULL, line = NA, .)用于添加用于添加标签m
22、ain, sub , xlab , ylab 设置主、副、置主、副、x轴、y轴的的标题line 设置置 文本与文本与图形形边缘的距离的距离text(x, y , labels, .)用于在用于在绘图区域添加文本区域添加文本x, y 设置添加文本的位置置添加文本的位置labels 设置添加的文本内容置添加的文本内容mtext(text, side = 3, line = 0, .)用于在用于在绘图框框边缘添加文本添加文本text 添加的文本内容添加的文本内容 side 表示表示边框位置，可框位置，可选择1，2，3，4练习（5分分钟） plot(1:10) #绘制底制底图 title(main=A
23、GBSP, line=1) #添加主添加主标题 text(6,4, labels=R Graphics, srt=45, cex=2, font=2) #添添加文本，并旋加文本，并旋转45度，放大度，放大2倍，粗体倍，粗体 mtext(text=R side text, side=4) #在在绘图框外添加文本框外添加文本添加坐添加坐标轴axis( )axis(side, at = NULL, labels = TRUE, .)side 添加坐添加坐标轴的位置，可的位置，可选值有有1，2， 3，4at 制定坐制定坐标轴上刻度出上刻度出现的位置的位置labels 设定刻度出定刻度出现位置的位置的标
24、签练习（10分分钟） op=par() #将默将默认的的par设置保存置保存 par(mfrow=c(1,2) #设置置par，绘制一制一页多多张图 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, col.axis = blue) #添加坐添加坐标轴 box() #添加外添加外边框框 plot(1:12, rnorm(12), xlab=, ylab=, axes=F, pch=18, cex=1.5, col=gr
25、een) axis(side=1, at=seq(2, 12, by=2), labels=LETTERS1:6, col.axis = red) #添加坐添加坐标轴注意放大注意放大绘图窗口窗口查看看变化化 axis(2) box() par(op) #回复默回复默认的的par设置置添加网格添加网格线grid( )练习（3分分钟） plot(300,type=n, xlab=, ylab=, xlim=c(1, 600), ylim=c(1, 400), xaxs=i, yaxs=i) grid(nx=30, ny=20, col=red) grid(nx=6, ny=4, col=black
26、, lty=1, lwd=2) box(lwd=2)grid(nx = NULL, ny = nx,.)nx 和和 ny 分分别表示横表示横纵轴上网格上网格线的条数的条数添加添加图例例 legend( ) 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) legend(x=0, y=8, legend=c(upwards, downwards), lty=1:2, lwd=2, bty=n) plot(runif(20), pch=16, col=red ,
27、 ylim=c(0,1.2), type=b,lty=1) 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, green), lty=1:2) 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) legend(x=0, y=8, legend=c(red,
28、green), fill=2:3, bty=n) box(lwd=2)练习（10分分钟）legend(x, y = NULL, legend, fill , lty, pch, lwd, angle, density, bty=n.)xy 表示表示图例的坐例的坐标位置位置（bottomrigt,bottom,bottomleft,left,topleft,top,topright,right）legend 设置置图例中的文字例中的文字说明明lty、lwd和和 pch 指定指定图例中点例中点线的的样式，式，设置与置与图中所画的中所画的图一致一致fill、angle和和density 用于填充用于
29、填充类的的图例例设置，如置，如绘图内容内容为条形条形图时用于条形用于条形图的的颜色、色、阴影阴影线、线的的倾斜度等的斜度等的设置置bty 设置置图例框的例框的样式，式， 通常通常设置置为n，不，不绘制制边框框2.3 常用常用图形形绘制制 (高高级绘图函数函数)散点散点图 plot() 或者或者points()饼图pieplot()直方直方图 hist()条形条形图barplot()箱箱图boxplot()等高等高线图contour()颜色色图image()饼图 pie( )pie(x, labels = names(x), .)x 数数值向量向量labels 设置置标签练习（5分分钟） pie
30、.sales=c(0.12, 0.3, 0.26, 0.16, 0.04, 0.12) #数据数据 names(pie.sales) = c(Blueberry, Cherry, Apple, Boston Cream, Other, Vanilla Cream) #设置数据置数据标签 pie.col = c(purple, violetred1, green3, cornsilk, cyan, white) #设置置颜色色 pie(x=pie.sales, col = pie.col) #绘制制饼图直方直方图hist( )练习（10分分钟） par(mfrow=c(2,2), mar=c(2
31、,3,2, 0.5) #绘图多多张 data(geyser, package=MASS) #调用数据用数据 hist(geyser$waiting, main = (1) freq = TRUE, xlab = waiting) hist(geyser$waiting, freq = FALSE, xlab = waiting, main = (2) freq = FALSE) hist(geyser$waiting, breaks = 5, density = 10, xlab = waiting, main = (3) breaks = 5) hist(geyser$waiting, br
32、eaks = 40, col = red, xlab = waiting, main = (4) breaks = 40)hist(x, breaks = Sturges, freq = NULL,probability = !freq, .)x为欲估欲估计分布的数分布的数值向量；向量；breaks 设置置计算分段区算分段区间的方法，可以的方法，可以设置置为数字，或其他数字，或其他 （这个参数决定了直方个参数决定了直方图的形状）的形状）freq 和和 probability 取取逻辑值T或者或者F，前者决定是否以，前者决定是否以频数作数作图，后者决定是否以概，后者决定是否以概率密度作率密度作图
33、，两者互斥，两者互斥条形条形图barplot( )练习（10分分钟）barplot(height, width = 1, space = NULL, names.arg = NULL, legend.text = NULL, beside = FALSE, horiz = FALSE, .)height 重要参数，它指定了条重要参数，它指定了条图的的长度，度，这个参数可以接受数个参数可以接受数值向量或者一个数据矩向量或者一个数据矩阵（矩（矩阵的列代表的列代表变量，行代表不同量，行代表不同观测值）beside 当当height为矩矩阵时起作，起作，beside为TRUE，条，条图并排排列，并排排
34、列，设为FALSE为堆砌堆砌排列排列width可以可以设置条的置条的宽度；度；space用以用以设置条之置条之间的的间距；距；为条形条形图的的标签legend.text 用来添加用来添加图例；例；horiz用以用以设置条形置条形图的方向（水平或垂直）的方向（水平或垂直） par(mfrow=c(2,4), mar=c(2,3,2,0.5) barplot(height=1:3) #输入入为向量向量时的的图 barplot(height=1:3, col=2:4, space=0.5) #输入入为向量向量时更改更改颜色和条色和条图间的的间距距 barplot(height=1:3, col=2:
35、4, space=0.5, horiz=T) #条条图方向改方向改为水平水平 barplot(height=1:3, col=2:4, space=0.5, horiz=T, names.arg=LETTERS1:3) #添加条形添加条形图的的标签 barplot(height=matrix(runif(6), 2,3) #height输入入为矩矩阵时 barplot(height=matrix(runif(6), 2,3), beside=T, col=2:3) #height输入入为矩矩阵时，beside设置置为T, 并更改并更改颜色色 barplot(height=matrix(runi
36、f(6), 2,3), beside=T, col=2:3,ylim=c(0, 2.3), legend.text = c(red, green) ) #添加添加图例例箱箱图boxplot( )练习（5分分钟）boxplot(x, .) ；boxplot(formula, .)x 或或 formula 设置置绘图的向量或是一个表达式的向量或是一个表达式horizontal为TURE 或者或者FALSE，设定箱定箱线图是否水平放置是否水平放置 data=data.frame(x=rnorm(12), y=rep(1:3, each=4) par(mfrow=c(2,2), mar=c(2,3,2
37、, 0.5) boxplot(data$x) boxplot(data$xdata$y) boxplot(data$xdata$y, col=2:4) boxplot(data$xdata$y, col=2:4, horizontal=T)等等值线图contour( )练习（5分分钟）contour(x, y , z, nlevels = 10, method, .)x 和和 y 为向量，代表矩向量，代表矩阵数据的的坐数据的的坐标刻度（刻度（纵横交叉横交叉组合成合成z的坐的坐标），注意他），注意他们不代表不代表z矩矩阵数据所数据所对应的坐的坐标z 为输入的数据矩入的数据矩阵，代表数据大小，比如
38、海拔高度，代表数据大小，比如海拔高度（设置置x y z 时需要小心，需要小心，以防以防错位位）nlevels 设定等高定等高线的条数默的条数默认为10，控制疏密，控制疏密 load(file.choose() #载入矩阵数据 par(mfrow=c(1,2), mar=c(2,3,2,0.5) contour(x=1:30*20, y=1:15*20, z=data, xaxs=i, yaxs=i) #绘制图形 contour(x=1:30, y=1:15, z=data, xaxs=i, yaxs=i, nlevels=20, col=red) #修改等高线密度，并改为红色颜色色图 imag
39、e( ) 和和image.plot()练习（5分分钟）image(x, y, z,.)主要的参数主要的参数设置大致与置大致与contour函数相同函数相同image.plot() 是是fields 包中的一个函数，包中的一个函数，优点是有点是有图例例 par(mfrow=c(1,2), mar=rep(1,4),ann=F) image(x=1:30*20, y=1:15*20, z=data, col=terrain.colors(100), axes=F) #绘制制image图，并，并设置置颜色色 box(lwd=2) image(x=1:30*20, y=1:15*20, z=data,
40、 col=terrain.colors(100), axes=F) contour(x=1:30*20, y=1:15*20, z=data, nlevels=20, lwd=1.5, add=T) #将等高将等高线叠加在上面叠加在上面 box(lwd=2)其他内容其他内容一一页多多图par() layout()图形形输出出pdf() jpeg()等等添加添加error bar人人图交互交互locator() identify()绘图辅助工具助工具 office 软件件一一页多多图1.1.使用使用par () 进行参数行参数设定定2. 使用使用layout( ) 函数函数par(mfrow=c
41、(x, y) 或者或者 par(mfcol =c(x,y) mfrow 以行以行为顺序画序画图mfcol 以列以列为顺序画序画图c(x, y) 设置列和行画的置列和行画的图形个数形个数练习（3分分钟） par(mfrow=c(2,2) #设置一置一张图内内绘制制4张小小图，以行，以行为顺序画，注意关序画，注意关闭前面的前面的图形窗口形窗口par设置才能生效！置才能生效！ plot(1:10) plot(1:10, type=l) plot(1:10, type=b) plot(1:10, type=s) ?layout() #查看看layout 的帮助文件的帮助文件图形形输出出练习（5分分钟）
42、利用利用grDevices包中的若干包中的若干图形形设备，我，我们可以将可以将R的的图形形输出出为各种格式的文件。各种格式的文件。基本的基本的图形形设备函数有位函数有位图设备bmp()、jpeg()、png()和和tiff()，以及矢量，以及矢量图设备postscript()和和pdf()，打开，打开图形形设备之后，所有的之后，所有的R图形都会被生成在形都会被生成在该图形形设备中，而不会再中，而不会再在窗口中在窗口中显示，直到示，直到图形形设备被关被关闭。pdf (file, .) file 设置置pdf文件名文件名jpeg( filename,.)filename 设置置jpg文件的文件名文
43、件的文件名 pdf(file=output.pdf) #输出文件名为output 的pdf文件 plot(1:10) #绘图 dev.off() #关闭pdf 绘图设备,输出的图形请在工作路径下查找 jpeg(filename=output.jpg) #输出文件名为output 的jpg文件 plot(1:10) #绘图 dev.off() #关闭jpeg绘图设备,输出的图形请在工作路径下查找dev.off( ) 用于关用于关闭图形形设备添加添加error bar-方案方案1练习（5分分钟）使用包使用包sciplot中的函数添加中的函数添加error bar bargraph.CI(.) 绘制
44、制barplot +error lineplot.CI(.) 绘制制lineplot +error优点：不需要自己写程序，就可以画点：不需要自己写程序，就可以画barplot+errorbar 和和lineplot+error bar缺点：比缺点：比较死板，无法添加一些死板，无法添加一些类型的型的error bar， 如如bootstrap 得到的得到的CI install.packages(sciplot) #安装安装sciplot包包 library(sciplot) #调用用sciplot包包 example(bargraph.CI) #查看例子看例子 example(lineplot.
45、CI) #查看例子看例子#具体参数具体参数设置置请用用 ?bargraph.CI() 和和 ?lineplot.CI() 查看看添加添加error bar-方案方案2思路：思路：1. 根据所需根据所需图形形类型型绘制底制底图2. error bar采用插入采用插入线段的方式插入段的方式插入优点：自由，方便，适用于任何点：自由，方便，适用于任何图形形 和任何和任何类型型CI的的error bar 插入插入缺点：写程序比缺点：写程序比较繁繁琐#条形条形图+error bar data=data.frame(x=1:3, y=c(4, 8, 6), low_CI=c(3.5, 7.3, 5.4),
46、up_CI=c(4.3,8.6, 6.4) #数据 plot(8,type=n ,xlim=c(0.5,3.5), ylim=c(0, 10), axes=F, xlab=, ylab=, yaxs=i) axis(2) #添加坐标轴 box() #添加图形边框 for(i in 1:3) rect (data$xi-0.3, 0, data$xi+0.3,data$yi, lwd=2) #添加矩形 for(i in 1:3) segments(data$xi, data$low_CIi, data$xi, data$up_CIi, lwd=2, col=blue) #添加线段 for(i in 1:3) segments(data$xi-0.05, data$low_CIi, data$xi+0.05, data$low_CIi, lwd=2, col=blue) #添加线段for(i in 1:3) segments(data$xi-0.05, data$up_CIi, data$xi+0.05, data$up_CIi, lwd=2, col=“blue”) #添加线段练习（15分分钟）ggplot2 包绘图包绘图
