在R語言中，可以使用多種方法將兩個時間序列畫在同一張圖上。這篇文章將介紹其中兩種常用的方法：基本的plot()函數(shù)和ggplot2包。

1. 使用plot()函數(shù)

plot()函數(shù)是R中最基本的可視化函數(shù)之一，它可以用于繪制各種類型的圖表，包括時間序列圖。下面是一個簡單的例子，展示如何使用plot()函數(shù)將兩個時間序列畫在同一張圖上：

# 生成兩個時間序列數(shù)據(jù)
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"))

在這個例子中，我們首先生成了兩個隨機(jī)的時間序列數(shù)據(jù)，然后使用plot()函數(shù)繪制了第一個時間序列（紅色），并使用lines()函數(shù)添加了第二個時間序列（藍(lán)色）。最后，使用legend()函數(shù)添加了一個圖例，以便區(qū)分不同的時間序列。

這種方法非常簡單，適用于簡單的時間序列圖。但是，當(dāng)需要更多的控制、更復(fù)雜的圖形或更多的注釋時，建議使用ggplot2包。

2. 使用ggplot2包

ggplot2是一個強(qiáng)大的可視化包，它提供了高度定制化的圖形功能。下面是一個例子，展示如何使用ggplot2繪制兩個時間序列圖：

# 加載ggplot2包
library(ggplot2)

# 生成兩個時間序列數(shù)據(jù)
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包，并生成了兩個隨機(jī)的時間序列數(shù)據(jù)，并將它們存儲在一個數(shù)據(jù)框中。然后，我們使用ggplot()函數(shù)來創(chuàng)建一個空白的圖層，并使用geom_line()函數(shù)分別添加兩個時間序列。注意，我們使用aes()函數(shù)來指定x軸和y軸變量，并使用color參數(shù)對兩個時間序列進(jìn)行標(biāo)記。接下來，我們使用labs()函數(shù)添加x軸和y軸標(biāo)簽，并使用scale_color_manual()函數(shù)手動設(shè)置顏色的映射關(guān)系。

ggplot2提供了非常靈活的方式來調(diào)整圖形，包括添加注釋、修改坐標(biāo)軸和排版等。這里只是介紹了很小一部分功能，讀者可以參考ggplot2的文檔和示例來進(jìn)一步學(xué)習(xí)。

總結(jié)：

本文介紹了如何使用plot()函數(shù)和ggplot2包在R語言中將兩個時間序列畫在同一張圖上。兩種方法都有各自的優(yōu)缺點，可以根據(jù)實際需要選擇合適的方法。如果只需要簡單的時間序列圖，可以使用plot()函數(shù)；如果需要更多的控制和定制化，建議使用ggplot2包。

推薦學(xué)習(xí)書籍
《CDA一級教材》適合CDA一級考生備考，也適合業(yè)務(wù)及數(shù)據(jù)分析崗位的從業(yè)者提升自我。完整電子版已上線CDA網(wǎng)校，累計已有10萬+在讀~

免費(fèi)加入閱讀：https://edu.cda.cn/goods/show/3151?targetId=5147&preview=0