在已有图表中添加额外序列

将两个时间序列用不同刻度显示在同一张图上，是一种非常直观的比较方式。

假设您已经绘制了 mydata 的图。正如视频中所示，您可以用 lines(mydata2) 将新的时间序列 mydata2 添加到这张已有的图上。若您希望在图的右侧为该时间序列添加一个具有等距刻度的坐标轴，请使用 axis(side, at)，其中 side 是一个整数，用于指定坐标轴绘制在图的哪一侧，at 设为 pretty(mydata2)。

最后，为了区分两个时间序列，您可以用 legend() 函数添加图例。来看一下视频中使用的示例：

> # x 指定图例在图中的位置
> legend(x = "bottomright",
         # legend 指定文本标签
         legend = c("Stock X", "Stock Y"),
         # col 指定颜色
         col = c("black", "red"),
         # lty 指定线型
         lty = c(1, 1))

由于图中有两个时间序列，legend() 中的一些选项被设置为长度为 2 的向量。

在本练习中，您将为两个时间序列创建图形和图例。相同的数据集 data 已为您提供。