ggplot2绘图系统——统计变换函数
在几何对象中以参数stat形式出现。
不同的几何对象对应不同的统计变换函数。
以直方图为例，几何对象geom_histogram(..., stat='bin')与stat_bin(.., stat='bar')的作用是一样的。
一般而言，我们不需要对数据进行额外的统计变换，使用默认的就好。但特殊情况时需要用到，如对数据进行log转换。
绘制QQ图
df <- data.frame(y=rt(200,df=5)) #随机生成t分布
ggplot(df,aes(sample=y))+
stat_qq() #or geom_qq()
自定义统计变换函数
可通过stat_function自定义一些统计变换函数来绘图，如正弦曲线、正态分布曲线等。
a <- ggplot(data.frame(x=c(-5,5)),aes(x))+
stat_function(fun=dnorm) #传入的函数只需名字，无需括号
b <- ggplot(data.frame(x=c(-5,5)),aes(x))+
stat_function(fun=dnorm,args = list(mean=2,sd=.5)) #传参
grid.arrange(a,b,ncol=1)
同时定义两个额外的统计变换，并进行图层叠加。
f <- ggplot(data.frame(x=c(0,10)),aes(x))
f+stat_function(fun=sin,color='red')+
stat_function(fun=cos,color='blue')
自定义函数
test <- function(x){x^2+x+20}
f+stat_function(fun=test)+
geom_text(aes(x=5,y=75),
label='y == x ^ 2 + x + 20',
parse = T,
size=7)
自定义统计变换函数能很好地体现出ggplot2的扩展性，自由正是ggplot2的最大优势！
作者：Bioinfarmer
若要及时了解动态信息，请关注同名微信公众号：Bioinfarmer。
