单种数据点类型的绘制
使用数据库mtcars作本文的数据来源进行介绍。
library(ggplot2)
#数据准备
data(mtcars)
mtcars$cyl <- as.factor(mtcars$cyl)
head(mtcars[, c("wt", "mpg", "cyl")], 3)#作散点图
b = ggplot(mtcars,aes(wt,mpg))
b + geom_point()
添加回归线
通常我们作散点图是为了进行回归分析（添加回归曲线）：
- 完全拟合
b + geom_point() +
geom_smooth()
geom_point()函数可添加参数：
shape定义点的形状，取值为0-25代表26种点的形状；
smooth()函数可以添加参数：
color定义线的颜色；
size定义线的粗细 ；
- 直线拟合
b + geom_point() +
geom_smooth(method = lm)
其中method = lm 即表示用直线拟合，默认的method 则使用完全拟合。
- 去掉阴影区域：
b + geom_point() +
geom_smooth(method = lm, se = FALSE)
参数se : FALSE 为无阴影，TRUE为有阴影，默认为TRUE ；
多种数据点类型的绘制
一个图上需要作多种类型的散点。
library(ggplot2)
#数据准备
data(mtcars)
mtcars$cyl <- as.factor(mtcars$cyl)
head(mtcars[, c("wt", "mpg", "cyl")], 3)
b = ggplot(mtcars,aes(wt,mpg))
使用的数据如下：
基本语法：
这里我们使用cyl作为区分不同种数据点类型的依据：
b + geom_point(aes(shape = cyl, color = cyl))
可以看到，cly有4,6,8三种类型，这里直接用cyl来规定点的颜色和形状。
添加回归线：
b + geom_point(aes(color = cyl, shape = cyl)) +
geom_smooth(aes(color = cyl), method = lm, se = FALSE,
)
同样使用geom_smooth()函数就可以添加三组数据点的回归线，要使回归线延长贯穿整个图，只需要添加一个参数fullrange = TRUE：
b + geom_point(aes(color = cyl, shape = cyl)) +
geom_smooth(aes(color = cyl), method = lm, se = FALSE,
fullrange = TRUE)
点的形状（shape）类型：
