R语言绘图：多图叠加和图形分页.doc

精品文档，仅供学习与交流，如有侵权请联系网站删除
【精品文档】第 1 页
R绘图课程：多图叠加与图形分页
gaom
在我们用R画图的时候常常碰到一种问题，就是我们简简单单一个对象的图无法达到我们想要的结果。可能我们是一个对象但有多种展示，需要把多个图放在一起。也可能我们要画的是多个对象，但每个对象的图其实都是并行的。前面一种情况我理解为是多图叠加，即需要多张不同的图拼凑到一张图中。后面的情况我理解为是图形分页，即把类似的图形有序的排列展示给大家看。今天我们讨论的主题就是如何去解决上述的两种情况。
首先，我们针对第一种情况。其实第一种情况我们还是要划分一下。多图叠加，其中的叠是指我们的绘图中两张或多张不同的图整合到一种图中，共用一个坐标轴。比如一张柱状图，一张曲线图合并到一张图中。而其中的加则是指我们想合并的图之间无法共用坐标轴，我们只能在一张图中划分不同的区域加需要的多张图放置进去。
光说不练假把式，今天我们就找几个实例展示一下，让大家看下我们如果处理这种常见的问题。
library("ggplot2")#这次主要是用ggplot来处理
data<-(file = "C:/Users/gaom/Desktop/R语言绘图：多图叠加和图形分页/",header=F,stringsAsFactors=F,sep = "\t")#因为文件中有数字也有字符，所以建议加上stringsAsFactors=F。
head(data)
## V1 V2 V3 V4
## 1 1 A
## 2 2 A
## 3 3 A
## 4 4 A
## 5 5 A
## 6 6 A
dim(data)
## [1] 48 4
第一列是染色体名，第二列和第三列分别是两种计算结果，具体意义暂时不予理会。第四列是染色体的区域，100000表示1到100000，200000表示100001到200000。我们大致知道数据结构即可。
下面我们开始画图
p1<-ggplot(data)+geom_bar(aes(x=data$V1,y=data$V3,fill = data$V4,group = data$V4),,position = "dodge",stat = "identity",colour = "black")+scale_x_continuous
精品文档，仅供学习与交流，如有侵权请联系网站删除
【精品文档】第 2 页
(breaks = 1:12)#加上position="dodge"后会每条染色体分成四个柱子，加上colour = "black"，则每个柱子的边框为黑色。
p1
上面已经有对应的柱状图了，下面再根据第一列和第三列画点线图。
p2<-ggplot(data)+geom_line(aes(x=data$V1,y=data$V2,colour =