先生成两个数据集，还可以利用软件自带数据集x<-round(runif(100,min=70,max=100))y<-round(runif(100,min=60,max=80))z<-round(runif(100,min=40,max=70))1、直方图hist(x);table(x)&barplot()2、散点图plot(x);plot(x,y);sunflowerplot(x)3、散点图集plot(iris[,1:4])4、饼图pie(x)5、箱线图boxplot(x)6、星相图stars(data.frame(x,y,z))雷达图stars(data.frame(x,y,z),full=T,drag.segment=T)7、脸谱图faces(data.frame(x,y,z)),需要aplpack包再library(TeachingDemos)后可使用faces28、茎叶图stem(x)9、QQ图qqnorm(x),qqline(x)10、地图map()需要maps包和geosphere包11、三维散点图scatterplot3d(x,y,z)，三维线图需要设置type=“l”；需要同名程序包一装置多图par(mfrow=c(3,1))然后plot(x,y);plot(x,z);plot(y,z)即可同时画三图同时启用多装置dev.new()
