R语言中的一些低级绘图命令

tomorrow

R里面有一套绘图函数是作用于现存的图形上的：称为低级作图命
令(low-level plotting commands)。下面有一些主要的:
points(x, y) 添加点（可以使用选项type=）
lines(x, y) 同上，但是添加线
text(x, y, labels,
...)
在(x,y)处添加用labels指定的文字；典型的用法是: plot(x, y,
type="n"); text(x, y, names)
mtext(text,
side=3, line=0,
...)
在边空添加用text指定的文字，用side指定添加到哪一边（参照
下面的axis()）；line指定添加的文字距离绘图区域的行数
segments(x0, y0,
x1, y1)
从(x0,y0)各点到(x1,y1)各点画线段
arrows(x0, y0,
x1, y1, angle= 30,
code=2)
同上但加画箭头， 如果code=2则在各(x0,y0)处画箭头， 如
果code=1则在各(x1,y1)处画箭头，如果code=3则在两端都画箭
头; angle控制箭头轴到箭头边的角度
abline(a,b) 绘制斜率为b和截距为a的直线
abline(h=y) 在纵坐标y处画水平线
abline(v=x) 在横坐标x处画垂直线
abline(lm.obj) 画由lm.obj确定的回归线（参照第五章）
rect(x1, y1, x2,
y2)
绘制长方形，(x1, y1)为左下角，(x2,y2)为右上角
polygon(x, y) 绘制连接各x,y坐标确定的点的多边形
legend(x, y,
legend)
在点(x,y)处添加图例，说明内容由legend给定
title() 添加标题，也可添加一个副标题
axis(side, vect) 画坐标轴，side=1时画在下边，side=2时画在左边，side=3时画
在上边，side=4时画在右边。可选参数at指定画刻度线的位置坐
标
box() 在当前的图上加上边框
rug(x) 在x-轴上用短线画出x数据的位置
locator(n,
type="n", ...)
在用户用鼠标在图上点击n次后返回n次点击的坐标(x; y)；并可
以在点击处绘制符号(type="p"时)或连线(type="l"时)，缺省情
况下不画符号或连线
注意，用text(x, y,expression(...))可以在一个图形上加上数学公
式，函数expression把自变量转换为数学公式。例如，
> text(x, y, expression(p == over(1, 1+e^-(beta*x+alpha))))
在图中相应坐标点(x; y)处显示下面的方程:
p =
1
1 + e¡(¯x+®)
为了能在表达式中代入某个变量的值，我们可以使用函数substitute和
as.expression，例如，为了代入R2的值（之前计算并储存在对象Rsquared中）
> text(x, y, as.expression(substitute(R^2==r, list(r=Rsquared))))
在图中相应坐标点(x; y)处显示：
R2 = 0:9856298
如果只显示3位小数，我们可以修改代码如下：
> text(x, y, as.expression(substitute(R^2==r,
+ list(r=round(Rsquared, 3)))))
将显示：
R2 = 0:986
最后，用斜体字显示R：
> text(x, y, as.expression(substitute(italic(R)^2==r,
+ list(r=round(Rsquared, 3)))))
R2 = 0:986