R语言基础图形元素—

R语言基础图形元素--点和线

简介
1. 点
2. 线
- 2.1 `abline()`函数
- 2.2 `segments()`函数
- 2.3 `arrows()`函数
- 2.4 `xspline()`函数
参考书籍

简介

点和线是构成图形的基础元素。在R语言中，关于点的设置，很多函数都可以通过pch()参数进行点的设置，也可以通过底层的points()函数向已有图形中添加点来实现。关于线条，R 中可以实现几乎无数种线条样式，因为它的 lty 参数相当灵活。下面将分别介绍这两种基本的图形构成元素。

1. 点

点的类型：pch 参数取值从 1 到 25 及其它符号。其中，21-25的点可以填充背景颜色。

需要注意的是，lwd()参数不仅可以设置线条的宽度，同样也可以设置点的边缘“线条”宽度。

示例：
这里以iris鸢尾花数据集为例。

plot(iris[, 3:4],pch = c(21,22,23)[as.integer(iris[["Species"]])],col = c("black", "red", "blue")[idx], panel.first = grid())
legend("bottomright",legend = levels(iris[["Species"]]),col = c("black", "red", "blue"), pch = c(21,22,23), bty = "n")

此处可以通过改变lwd参数改变点边缘“线条”宽度，如下：

plot(iris[, 3:4],pch = c(21,22,23)[as.integer(iris[["Species"]])],col = c("black", "red", "blue")[idx], panel.first = grid(),lwd = 2)
legend("bottomright",legend = levels(iris[["Species"]]),col = c("black", "red", "blue"), pch = c(21,22,23), bty = "n")

2. 线

lines()函数可以向图中添加曲线，R中的线条可以通过lty参数设置，除了取值 0~6 之外，可以根据一个十六进制的数字串（位数必须是偶数位，且非零）来设定线条的虚实。

2.1 `abline()`函数

在平面坐标系中，通过截距和斜率便可确定一条直线。abline()函数就是用来添加直线的。

用法

abline(a = NULL, b = NULL, h = NULL, v = NULL, reg = NULL,coef = NULL, untf = FALSE, ...)

其中，a 是截距，b 是斜率，h 是画水平线时的纵轴值，v 是画垂直线时的横轴值，reg 是一个能用函数 coef() 提取系数（包含斜率和截距）的 R 对象，典型的就是用线性模型（回归）生成的对象，系数是一个长度为 2 的向量，分别为截距和斜率。

示例

z <- lm(dist ~ speed, data = cars)
plot(cars)
# 这三个函数能达到相同的效果
abline(z)
abline(reg = z)
abline(coef = coef(z))

2.2 `segments()`函数

生成线段。

用法

segments(x0, y0, x1 = x0, y1 = y0,col = par("fg"), lty = par("lty"), lwd = par("lwd"),...)

前四个参数表示线段的起点和终点坐标，后面的几个参数在此不再赘述。

示例

plot(1:10, type = "n", xlim = c(0, 8), ylim = c(0, 10))
segments(rep(3, 4), 6:9, rep(5, 4), 6:9, col = gray(seq(0.2, 0.8, length = 4)))
text(4, 9.8, "segments")

2.3 `arrows()`函数

显而易见，该函数用来绘制箭头。

用法

arrows(x0, y0, x1 = x0, y1 = y0, length = 0.25, angle = 30, code = 2,col = par("fg"), lty = par("lty"), lwd = par("lwd"), ...)

前四个参数表示箭头的起点和终点坐标，length 表示箭头尖上短线的长度（单位：英寸），angle 表示箭头尖短线的角度（默认为 30度），code 表示箭头的样式。

2.4 `xspline()`函数

X-spline是相对于点绘制的一条直线。对于每个点，直线可以通过(插值)点，也可以只接近(近似)点。

示例

x <- sort(stats::rnorm(5))
y <- sort(stats::rnorm(5))
plot(x, y, pch = 19)
lines(xspline(x, y, 1, draw = FALSE))

感兴趣可以通过?xspline查看帮助文档进一步学习该函数。

##侵权请联系作者删除！

参考书籍

[1] 现代统计图形