本节我们学习一下几个基本的绘图的方法，如何实现数据散点图分组，使得各数据组的差异直接的反应在图形上面。同时，按照不同的散点形状按照形状或者尺寸直观的显示在图形框中。接着，我们深入学习拟合直线以及拟合曲线与散点图绘制在同一张图形中，学习一下如何实现数据点误差条的画法。
以下用R语言实现上述几种图形的功能，以及将图形结果呈现出来。
1.将散点分组显示在同一张图形中，各组呈现不同颜色
xyplot(mpg~disp,data=mtcars, groups =cyl,auto.key=list(corner=c(1,1)))
同时，上述图形显示结果，我们还可以使用ggplot2中的qplot函数来实现。
qplot(disp,mpg,data=mtcars, col =as.factor(cyl))
qplot(disp,mpg,data=mtcars, shape=as.factor(cyl))
2.将散点分组显示在同一张图形中，各组呈现不同散点形状
qplot(disp,mpg,data=mtcars, shape=as.factor(cyl))
3.将散点分组显示在同一张图形中，将各组呈现不同散点尺寸
qplot(disp,mpg,data=mtcars, size=as.factor(cyl))
4
.使用text函数给散点添加标签
plot(mtcars$disp,mtcars$mpg, type="n")
text(mtcars$disp,mtcars$mpg, mtcars$cyl)
5
.绘制误差条
arrows(x0=mtcars$disp*0.95,
y0=mtcars$mpg,
x1=mtcars$disp*1.05,
y1=mtcars$mpg,
angel=90,
code=3,
length=0.04,
lwd=0.4)
6
.将
散点图与拟合直线绘制在同一张图形中
plot(mtcars$disp,mtcars $mpg)
lmfit abline(lmfit)
7.将散点图与拟合曲线绘制在同一张图形中
-局部加权回归散点平滑法
lines(lowess(cars),f=0.3, col ="orange")
更多数据分析，还请继续关注
R语言实战
！
合作QQ：2127198282
