R语言绘图（4）----ggplot2笔记常用图形

基本图形
1.geom_area（）面积图
2.geom_bar（stat=identity）条形图
3.geom_line（）折线图，依据图形属性group分组，连接相同组的数据点
4.geom_plot（）散点图，支持图形属性shape，shape=1:中空点，shape=’.’：小点。alpha=3：三个点重叠时，完全不透明，一个点透明度33.3%。
5.geom_rect(xmin,xmax,ymin,ymax),geom_tile(),geom_raster().矩形图，具体不同见书本。
6.geom_histogram()直方图
7.geom_errorbar 添加errorbar，注意图形属性aes中必须有xmin,xmax,ymin,ymax这些图形参数

library(ggplot2)
df<-data.frame(x=c(3,1,5),y=c(2,4,6),label=c('a','b','c'),family=c('sans','serif','mono'))
p<-ggplot(df,aes(x,y,label=label))+labs(x=NULL,y=NULL) #隐藏坐标轴标签
theme(plot.title=element_text(12))#设置标题尺寸

p+geom_point()+ggtitle('point')#添加标题

p+geom_text(aes(family=family))+ggtitle('text')#aes设置显示3种字体

p+geom_bar(stat='identity')+ggtitle('bar')

p+geom_tile()+ggtitle('raster')

p+geom_point(aes(shape=label,color=label))+geom_text(nudge_y=-0.3,size=8)#对数据点添加文本注释，以及添加的位置

#ggplot2的文本标签是固定大小的，不能随着图形的变化而变化
p<-ggplot(mpg,aes(displ,hwy))
p+geom_text(aes(label=model))+xlim(1,8)
p+geom_label(aes(label=model))+xlim(1,8)#geom_label是geom_tex衍生版本

#另外一种添加文本标签的程序包
library(directlabels)
p<-ggplot(mpg,aes(displ,hwy,color=class))
p+geom_point()+directlabels::geom_dl(aes(label=class),method='smart.grid')