在R语言中，可以使用多种方法将两个时间序列画在同一张图上。这篇文章将介绍其中两种常用的方法：基本的plot()函数和ggplot2包。

1. 使用plot()函数

plot()函数是R中最基本的可视化函数之一，它可以用于绘制各种类型的图表，包括时间序列图。下面是一个简单的例子，展示如何使用plot()函数将两个时间序列画在同一张图上：

# 生成两个时间序列数据
set.seed(123)
ts1 <- cumsum(rnorm(100))
ts2 <- ts1 + rnorm(100)

# 绘制时间序列图
plot(ts1, type = "l", col = "red", xlab = "时间", ylab = "值")
lines(ts2, col = "blue")
legend("topleft", legend = c("ts1", "ts2"), lty = 1, col = c("red", "blue"))

在这个例子中，我们首先生成了两个随机的时间序列数据，然后使用plot()函数绘制了第一个时间序列（红色），并使用lines()函数添加了第二个时间序列（蓝色）。最后，使用legend()函数添加了一个图例，以便区分不同的时间序列。

这种方法非常简单，适用于简单的时间序列图。但是，当需要更多的控制、更复杂的图形或更多的注释时，建议使用ggplot2包。

2. 使用ggplot2包

ggplot2是一个强大的可视化包，它提供了高度定制化的图形功能。下面是一个例子，展示如何使用ggplot2绘制两个时间序列图：

# 加载ggplot2包
library(ggplot2)

# 生成两个时间序列数据
set.seed(123)
df <- data.frame(time = 1:100, ts1 = cumsum(rnorm(100)), ts2 = cumsum(rnorm(100)) + rnorm(100))

# 绘制时间序列图
ggplot(df, aes(x = time)) +
  geom_line(aes(y = ts1, color = "ts1")) +
  geom_line(aes(y = ts2, color = "ts2")) +
  labs(x = "时间", y = "值", color = "") +
  scale_color_manual(values = c("ts1" = "red", "ts2" = "blue"))

在这个例子中，我们首先加载ggplot2包，并生成了两个随机的时间序列数据，并将它们存储在一个数据框中。然后，我们使用ggplot()函数来创建一个空白的图层，并使用geom_line()函数分别添加两个时间序列。注意，我们使用aes()函数来指定x轴和y轴变量，并使用color参数对两个时间序列进行标记。接下来，我们使用labs()函数添加x轴和y轴标签，并使用scale_color_manual()函数手动设置颜色的映射关系。

ggplot2提供了非常灵活的方式来调整图形，包括添加注释、修改坐标轴和排版等。这里只是介绍了很小一部分功能，读者可以参考ggplot2的文档和示例来进一步学习。

总结：

本文介绍了如何使用plot()函数和ggplot2包在R语言中将两个时间序列画在同一张图上。两种方法都有各自的优缺点，可以根据实际需要选择合适的方法。如果只需要简单的时间序列图，可以使用plot()函数；如果需要更多的控制和定制化，建议使用ggplot2包。