函数par来永久地改变绘图参数也就是说后来的图形都将按照par指定.PPTVIP

R graph Group 8： 尹建民 张凤珺 一个最简单的R绘图实例 x-seq(0,2*pi,0.1) plot(x,sin(x)) x-seq(0,2*pi,0.1) plot(x,cos(x)) 如何储存为文件？ 如何使两条曲线在同一个窗口显示？ 如何注释与美化？ 管理绘图 管理绘图 如何储存为文件？ dev.list() 显示绘图设备 dev.set() 选择作为当前绘图设备 dev.off() 关闭绘图设备 实例演示： jpeg(file=d:/output.jpg) x-seq(0,2*pi,0.1) plot(x,sin(x)) dev.off() 高级绘图函数：plot 函数原型：plot(x, y, parameters...) plot参数：pch pch= Tips:注意15-20与21-25的区别。 x11() x-seq(0,2*pi,0.1) plot(x,cos(x), pch=16) 实例演示： plot参数：col与type 指定图形颜色col p: 点 l: 线 b: 点连线 o :点连线 h: 垂直线 s: 阶梯式，垂直线顶端显示数据， S: 同上，但是在垂直线底端显示数据 指定图形的类型type blue red yellow … colors() x11() x-seq(0,2*pi,0.1) plot(x,cos(x),type=l,col=red) 实例演示： Tips:注意不要忘记双引号 Q: b p s S 没有发现两对的区别。。。 plot参数：main xlab ylab xlim ylim Tips:注意坐标轴范围是否合适。 plot(x, sin(x),xlab = “data1”,ylab = “data2” , main = Scatter plot , xlim = c(0,10) ,ylim = c(-1,1)) 实例演示： 坐标轴的标签，必须是字符型值 指定轴的上下限， 例如xlim=c(1, 10) 或者xlim=range(x) xlim ylim : xlab ylab : main : 主标题，必须是字符型值 其他绘图函数 如何在图形上添加文字？ 绘图命令 如何添加图例？ 如何添加点与线？ 如何绘制多边形？ 绘图命令 绘图命令：添加图例和标题 plot(x,sin(x), col=“red”, pch=20) legend(topright, sin(x), pch = 20, col=red) title(The model) legend : 添加图例 legend(x, y = NULL, legend, fill = NULL, col = par(col), border=black, lty, lwd, pch…) title : 添加标题 title(main = NULL, sub = NULL, xlab = NULL, ylab = NULL, line = NA, outer = FALSE, ...) 实例演示： Tips:注意图例与图像样式的一致 可以直接输入坐标 绘图命令：增加点与线与多边形 x-seq(0,2*pi,0.1) plot(x,sin(x), col=red, pch=20, family = serif, xlim = c(0, 7.5)) for(x in seq(0,2*pi,0.1)){ points(x,cos(x),col=blue,pch=20, family = serif) } ? 实例演示： lines(x, y, …) : 在图像增加线 points(x, y, ...) : 在图像上增加点 rect(x1, y1, x2,y2) : 绘制长方形，(x1, y1)为左下角，(x2,y2)为右上角 polygon(x, y) : 绘制连接各x,y坐标确定的点的多边形 points和plot的区别，低级绘图函数和高级绘图函数，plot函数拥有更多参数和功能 字体参数 绘图参数 函数par来永久地改变绘图参数 也就是说后来的图形都将按照par指定的参数来绘制 ? 实现标题的左对齐和背景颜色的改变： x11() par(bg= blue,adj=0) x-seq(0,2*pi,0.1) plot(x , sin(x), xlab = data1, ylab = data2, main = Scatter plot) ? bg : 控制背景颜色 adj : 控制关于文字的对齐方式，0是左对齐，0.5是居中对齐，1是右对齐 参数 描述 adj 控制关于文字的对齐方式，0是左对齐，0.5