在上一篇文章中介紹了abline()函數(shù)的使用方法。abline函數(shù)主要在當(dāng)前圖中添加一條直線，該直線可以通過給定截距和斜率，或者垂直于橫軸或縱軸的向量，或者是回歸對(duì)象等。

lines()函數(shù)也是一個(gè)低水平繪圖函數(shù)。它主要是在當(dāng)前繪圖中通過線段依次將點(diǎn)連接起來。

其語法格式為：

lines(x, ...)

默認(rèn)格式為：

lines(x, y = NULL, type = "l", ...)

x, y是數(shù)值向量，表示點(diǎn)的坐標(biāo)。

type字符串，表示繪圖類型。默認(rèn)為劃線。

...為附加參數(shù)，如線型，線的顏色等等。

下面舉例說明，本例統(tǒng)計(jì)了一周當(dāng)中，工作日和非工作日下午1點(diǎn)到8點(diǎn)的網(wǎng)站訪問情況，繪制圖查看趨勢(shì)。

編寫R程序如下：

t <- rep(1:8)  #向量t表示時(shí)間1~8點(diǎn)

#v1為非工作日時(shí)網(wǎng)站在1~8點(diǎn)時(shí)的平均訪問量
v1 <- c(245,356,210,189,345,234,191,452)

#v2工作日時(shí)網(wǎng)站在1~8點(diǎn)時(shí)的平均訪問量
v2 <- c(345,451,541,548,600,720,650,560)

#使用plot繪制一個(gè)空?qǐng)D，lines函數(shù)必須是在已有圖形上繪制
plot(c(1,8), c(100, 750), type = "n", xlab = "時(shí)間", ylab = "訪問次數(shù)")

#使用abline函數(shù)添加網(wǎng)格線
abline(h = seq(100, 750, by = 20),v = 0:8, col = "lightgray", lty = 3)

#繪制折線，分別用紅色和藍(lán)色加以區(qū)分
lines(t, v1, col = "red")
lines(t, v2, col = "blue")

繪圖結(jié)果如下圖所示：