par(mfcol=c(2,1))
plot(y1~x, data=data,type="l",col="green")
plot(y2~x, data=data,type="l",col="red")
就行了吧
直方图(Histogram)，又称质量分布图，是一种统计报告图，由一系列高度不等的纵向条纹或线段组成，表示数据分布的情况。 一般用横轴(X轴)表示数据类型，纵轴(Y轴)表示分布(相应值的频数)情况。绘制直方图，首先要对数据进行分组，然后统计每个分组内数据元的数量。 在平面直角坐标系中，横轴标出每个组的端点，纵轴表示频数，每个矩形的高代表对应的频数，称这样的统计图为频数分布直方图。一般要了解以下几个名词的概念：
组数：统计数据时，把数据按照不同的范围分成几个组，分成组的个数称为组数；
组距：每一组两个端点的差；
频数：分组内的数据元的数量除以组距；
1、显示各组频数或者数量分布情况；
2、显示各组间频数或数量的差异；
可以利用hist()函数进行绘制：
[1] Robert I. Kabacoff (著). R语言实战(高涛/肖楠/陈钢 译). 北京: 人民邮电出版社.
[2] https://www.cnblogs.com/xudongliang/p/6913363.html
[3] https://zhuanlan.zhihu.com/p/259835459
最近小Q在做自然选择分析，分析完之后简单粗暴的对候选基因做了富集分析，并做了展示，比起气泡图，我模仿了另一种作图方式，显示效果更佳。所以想在此分享一下如何用R语言画富集分析示意图（非气泡图）。
利用ggplot2+grid包进行画图，采用分面的思想作图。
最终效果图：
撰文 &编辑：VickieQ
校对：HCLO4 &花毛
