R语言图形代-码.doc

plot(cars$dist~cars$speed,#y~x，cars是R自带的数据 main=Relationship between car distance speed,#标题 xlab = Speed(miles per hour),#x轴标题 ylab = Distance travelled (miles),#Y轴标题 xlim = c(0,30),#设置x轴的取值区间为0到30 ylim = c(0,140),#设置y轴的取值区间为0到140 xaxs = i,#这里是设置x轴的风格，暂时没看明白有多大区别 yaxs = i, col = red,#设置颜色 pch = 19)#pch指代点的形状，用数字表示，可查看帮助文档 #如果要保存图片怎么办呢？我觉得最简单的方法就是使用RStudio这个IDE，极其得好，可惜很多人都不知道。#如果你不会，可以用如下代码实现：#（图形的参数还有很多个，我这里只使用了其中的几个） png(filename=散点图.png,width=480,height=480) plot(cars$dist~cars$speed,#y~x main=Relationship between car distance speed,#标题 xlab = Speed(miles per hour),#x轴标题 ylab = Distance travelled (miles),#Y轴标题 xlim = c(0,30),#设置x轴的取值区间为0到30 ylim = c(0,140),#设置y轴的取值区间为0到140 xaxs = i,#这里是设置x轴的风格，暂时没看明白有多大区别 yaxs = i, col = red, pch = 19)#pch指代点的形状，用数字表示，可查看帮助文档 dev.off() 如果你还有另一组数据，需要在上面这幅图里绘制，也就是在同一幅图里面绘制两组数据的散点图，可以像下面这样用point函数： plot(cars$dist~cars$speed,#y~x main=Relationship between car distance speed,#标题 xlab = Speed(miles per hour),#x轴标题 ylab = Distance travelled (miles),#Y轴标题 xlim = c(0,30),#设置x轴的取值区间为0到30 ylim = c(0,140),#设置y轴的取值区间为0到140 xaxs = i,#这里是设置x轴的风格，暂时没看明白有多大区别 yaxs = i, col = red, pch = 3)#pch指代点的形状，用数字表示，可查看帮助文档 points(cars$speed~cars$dist,pch=19)#因为比较难弄数据，就把原先的数据因果关系颠倒一下，pch设置与前面不同以区分 如果自己没有数据的话，可以用data()查看R语言内置的数据的哦。还是有挺多数据的。 上面的这些是散点图，但是你只要在参数里面type=l#是字母l，那么就会将这些点串联起来画成线了。 plot(cars$dist~cars$speed,#y~x main=Relationship between car distance speed,#标题 xlab = Speed(miles per hour),#x轴标题 ylab = Distance travelled (miles),#Y轴标题 xlim = c(0,30),#设置x轴的取值区间为0到30 ylim = c(0,140),#设置y轴的取值区间为0到140 xaxs = i,#这里是设置x轴的风格，暂时没看明白有多大区别 yaxs = i, col = red, type=l,#是字母l，那么就会将这些点串联起来画成线了 pch = 19)#pch指代点的形状，用数字表示，可查看帮助文档 条形图的绘制方法（bar plot），数据是该书自带的 Sales - read.csv(citysales.csv,header=TRUE)#header设置为TRUE表示把数据行和列的名称也读取进来 barplot(Sales$ProductA, names.arg=Sales$City, col=blue) 用代码保存图形，将绘图语句写在 开启目标图形设备的语句 和 关闭目标图形设备的语句 之间即可。 #pdf(mygraph.pdf)#pdf文件 win.metafile(filen