R的绘图实例集锦

http://www.cs.uoregon.edu/Classes/09W/cis455/lectures/visualization.R.pdf

http://panda0411.com/2012/02/24/r%E8%AF%AD%E8%A8%80%E5%AD%A6%E4%B9%A0%E7%AC%94%E8%AE%B0-%E7%BB%98%E5%88%B6%E5%9B%BE%E5%BD%A2/

====================

简单二维图：点，曲线，建议参考：

====================

最容易想到的画图函数就是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：http://www.cnblogs.com/wentingtu/archive/2012/03/15/2399458.html

===========