如何為我的 3 個圖在一張圖中擬合一條線性回歸線？

Question

我在 R 中有一個問題，我需要一點幫助。我想在一個圖表中擬合線性進展線，其中包含我創建的 3 個不同的圖，但我找不到正確的代碼。 對於三個單獨的線性進展線，我的 3 個情節中的每一個，我都沒有問題......但是對於我所有 3 個情節的總線性進展線，我找不到有用的東西。 任何形式的幫助將不勝感激......這是我的代碼：

plot(Age ,Depth, type="l", xlim= rev(c(min_x, max_x)), ylim= rev(c(min_y, max_y)), 
           col= "red", xaxt='n',  yaxt='n', xaxs="i", yaxs="i", xlab=NA, ylab=NA)
lines(Age1, Depth1, col="dark green")
lines(Age2, Depth2, col="blue")
axis(side= 3)
axis(side= 4, las=2)
mtext(side=3, line=2.3 , "Age (Ma)")
par(mar = c(5, 4, 4, 8) + 0.2)
mtext(side=4, line=3 , "Depth (mcd)")

Answer 1

AgeAll   = c(Age, Age1, Age2)
DepthAll = c(Depth, Depth1, Depth2)
abline(lm(DepthAll ~ AgeAll))