R中的疊加圖

Question

我需要在具有相同x和y范圍的同一繪圖上繪制2個不同的數據。 單擊此處查看代碼的結果 。 如您所見，左邊的一個在2004年有一個空格。我需要在此處放置第二個數據點（藍色）。 但是，右邊的就是結果。 有人可以幫我解決這個問題嗎？

這是我當前的代碼：

plot1 <- c(64123456,75123456....,99417287) #total of 29 values
plot2 <- c(80824322)

plot(plot1, col="red",pch=16,xlab = "Year", ylab = "Population",main = "Population of XXX from 1990 to 2020",yaxt="n",xaxt="n",las=2)
par(new=TRUE)
plot(plot2, col="blue",pch=17,axes=FALSE,xlab="",ylab="")

更新： 這是我使用points(plot2, col="blue",pch=17,xlab="",ylab="")的結果points(plot2, col="blue",pch=17,xlab="",ylab="")為什么將它放在第一個x值上？

Answer 1

第一次使用plot然后points

plot1 <- c(64123456,75123456,99417287) #total of 29 values
plot2 <- c(80824322)
plot(plot1, col="red",pch=16,xlab = "Year", ylab = "Population",main = "Population of XXX from 1990 to 2020",yaxt="n",xaxt="n",las=2)
points(plot2, col="blue",pch=17,axes=FALSE,xlab="",ylab="")

Answer 2

我不確定我是否理解正確，但是下面的代碼用於將plot2值放入空白位置...

由於您尚未共享整個數據，因此我剛剛創建了一個虛假數據。

data <- 1:31
data[15]<-NA 

plot1 <- data 

plot2 <- 15

date <- as.character(1990:2020)

plot(date,plot1, col="red",pch=16,xlab = "Year", 
ylab = "Population",main = "Population of XXX from 1990 to 2020")
points("2004" ,plot2,col="blue")

這是輸出。