R-如何繪制多個疊加圖/散點圖？

Question

我正在研究一個機器學習問題，試圖將使用兩種不同的ML方法的預測與原始測試值進行比較，並查看它們的比較結果，並試圖將結果可視化。 我已經完成了2個單獨的散點圖（在測試值和預測值之間），但是我想查看這些值之間的差異。 因此，我嘗試將數據細分為使用第一個ML算法的100個ytest值，100個預測值（ymle_predict）和使用第二個ML算法的100個預測值（ymap_predict）。

我希望我的x軸代表每個數據點，而y軸代表該數據點的3個不同值（ytest，ymle_predict和ymap_predict）。

假設我們有：

ytest<- c(1, 2, 3, 4, 5, 6, 7 )
ymle_predict<-c(1.1, 2.1, 3.1, 4.1, 5.1, 6.1, 7.1 )
ymap_predict <- c(1.2, 2.2, 3.2, 4.2, 5.2, 6.2, 7.2 )

其中值是按順序排列的，因此ymle_predict中的第二個元素代表ytest中第二個元素的數據點預測。

我想看看這些點之間如何變化，就像說我們如何看到不同股票（隨即每種顏色用不同的顏色）隨時間變化的重疊圖一樣。 但是，這里的時間不是x軸，而是一個計數器變量，例如：

i<- c(1,2,3,4,5,6,7)

我曾嘗試將這些元素放入數據框，但這並沒有幫助我提出任何答案。

Answer 1

使用ggplot和dplyr：

library(ggplot2)
library(dplyr)

df <- data.frame(ytest = c(1, 2, 3, 4, 5, 6, 7 ),
                 ymle_predict = c(1.1, 2.1, 3.1, 4.1, 5.1, 6.1, 7.1 ),
                 ymap_predict = c(1.2, 2.2, 3.2, 4.2, 5.2, 6.2, 7.2 ),
                 i = c(1,2,3,4,5,6,7))

df.plot <- df %>%
  gather(results, value, -c("i"))


ggplot(df.plot, aes(x=i, y=value, color=results)) +
  geom_point()