main="Relationshipbetweencardistance&speed",#标题xlab="Speed(milesperhour)",#x轴标题ylab="Distancetravelled(miles)",#Y轴标题xlim=c(0,30),#设置x轴的取值区间为0到30ylim=c(0,140),#设置y轴的取值区间为0到140xaxs="i",#这里是设置x轴的风格，暂时没看明白有多大区别yaxs="i",col="red",#设置颜色pch=19)#pch指代点的形状，用数字表示，可查看帮助文档#如果要保存图片怎么办呢？我觉得最简单的方法就是使用RStudio这个IDE，极其得好，可惜很多人都不知道。#如果你不会，可以用如下代码实现：#（图形的参数还有很多个，我这里只使用了其中的几个）png(filename="散点图.png",width=480,height=480)plot(cars$dist~cars$speed,#y~xmain="Relationshipbetweencardistance&speed",#标题xlab="Speed(milesperhour)",#x轴标题ylab="Distancetravelled(miles)",#Y轴标题xlim=c(0,30),#设置x轴的取值区间为0到30ylim=c(0,140),#设置y轴的取值区间为0到140xaxs="i",#这里是设置x轴的风格，暂时没看明白有多大区别yaxs="i",col="red",pch=19)#pch指代点的形状，用数字表示，可查看帮助文档dev.off()如果你还有另一组数据，需要在上面这幅图里绘制，也就是在同一幅图里面绘制两组数据的散点图，可以像下面这样用point函数：plot(cars$dist~cars$speed,#y~xmain="Relationshipbetweencardistance&speed",#标题xlab="Speed(milesperhour)",#x轴标题ylab="Distancetravelled(miles)",#Y轴标题xlim=c(0,30),#设置x轴的取值区间为0到30ylim=c(0,140),#设置y轴的取值区间为0到140xaxs="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~xmain="Relationshipbetweencardistance&speed",#标题xlab="Speed(milesperhour)",#x轴标题ylab="Distancetravelled(miles)",#Y轴标题xlim=c(0,30),#设置x轴的取值区间为0到30ylim=c(0,140),#设置y轴的取值区间为0到140xaxs="i",#这里是设置x轴的风格，暂时没看明白有多大区别yaxs="i",col="red",type="l",#是字母l，那么就会将这些点串联起来画成线了pch=19)#pch指代点的形状，用数字表示，可查看帮助文档条形图的绘制方法（barplot），数据是该书自带的Sales<-read.csv("citysales.csv",header=TRUE)#header设置为TRUE表示把数据行和列的名称也读取进来barplot(Sales$ProductA,names.arg=Sales$City,col="blue")用代码保存图形，将绘图语句写在开启目标图形设备的语句和关闭目标图形设备的语句之间即可。#pdf("mygraph.pdf")#pdf文件win.metafile("filename.wmf")#windows图形文件#png("filename.png")#PBG文件#jpeg("filename.jpg")#JPEG文件#bmp("filename.bmp")#BMP文件#postscript("filename.ps")#PostScript文件attach(mtcars)plot(wt,mpg)#散