====================
简单二维图：点，曲线，建议参考：
====================
最容易想到的画图函数就是plot了
R中当然也有它。
最常画的图就是二维曲线图了。
现在我们用plot来画它
既然是画二维图，
第一步，当然是将x，y的值序列都建立好
e.g.
这里就随机构造10个数
x <- rnorm(10) y <- rnorm(10)
然后用plot(x,y)，当然可以得到一个由R来为你制定的最简单的二维图
第二步，
你可以决定：
确定X,Y坐标名称： xlab = "name of x-axis" ylab = "name of y-axis"
X,Y坐标范围:xlim = c(-2,2) ylim = c(-2,2)
决定画点还是画线:
如果是点图，可以决定点的形状 pch = ? (还可以由clo和bg制定轮廓色)
e.g.
plot (x, y, xlab = "Ten random values", ylab = "Ten other random values", xlim = c(-2,2), ylim = c(-2,2), pch = 22, col = "red", bg = "yellow" )
title("How to customize a plot with R", font.main = 3, adj = 1) 这里给出一个很好的例子：
====================
二维曲线图+差异显示
====================
示意图：
原始数据：
| 季度 | 目标 | 实际 | 中间值 | 差异 |
| 第一季度 | 320 | 260 | 290 | -60 |
| 第二季度 | 300 | 280 | 290 | -20 |
| 第三季度 | 350 | 390 | 370 | 40 |
| 第四季度 | 300 | 380 | 340 | 80 |
代码：
x <- c(320, 300, 350, 300 ) z <- c(260, 280, 390, 380) plot(x, ylim = c(200, 450), type = 'n', axes = FALSE, xlab = '', ylab = '') lines(spline(x, n = 1000), col = 'red', lwd = 2) lines(spline(z, n = 1000), col = 'blue', lwd = 2) axis(1,at = 1:4, labels = paste('第',1:4,'季度',sep = '')) axis(2, las = 1) box() for(i in 1:4) arrows(i , x[i], i, z[i], length = 0.15, angle = 20, lwd = 2.5, col = 'brown') for(i in 1:4) text(i, (x[i] + z[i])/2, (z - x)[i], col = gray(0.7)) legend('topleft', c("实际", "目标"), col = c('blue','red'), lty = 1, lwd = 2) ==============接下来介绍一些专题图的绘制======================
===========
热点图 heatmap：
===========