查詢百度之后，發(fā)現(xiàn)在R上一次顯示多張圖的函數(shù)很多，比如layout()或者分屏函數(shù)，但是這些都不是我想要的結(jié)果。
之后，發(fā)現(xiàn)了line()函數(shù)可以保留原來圖片繼續(xù)作圖，在括號中填入所需畫圖的部分即可（我是將一個矩陣作圖）。
先運行plot()函數(shù)，再注釋掉plot()函數(shù)運行l(wèi)ine()函數(shù)即可。
效果如下：
補充：R語言：在同一張圖作不同曲線
R語言將兩條曲線作在同一張圖的方法是
library(ggplot2)
year<-c(1993,1998,2003,2008)
Res<-c(0.0227,0.0198,0.0155,0.0147)
COPD<-c(0.0138,0.0125,0.0075,0.0069)
#R語言基礎(chǔ)包作圖
plot(year,Res,col=2,type="b",ylim=c(0.005,0.035),xlab = "Year",ylab ="Morbidity")
lines(year,COPD,col=3,type="b")
legend("topright",pch=c(15,15),legend=c("Respiratory","COPD"),col=c(2,3),bty="n")
#ggplot包作圖
dd <- data.frame(year,Res,COPD)
ggplot()+geom_line(data = dd,aes(x = year,y = Res,colour = "Respiratory"),size=1)+
geom_point(data = dd,aes(x = year,y = Res,colour = "Respiratory"),size=3)+
ylim(0.005,0.025)+
geom_line(data = dd,aes(x = year,y = COPD,colour ="COPD"),size=1) +
geom_point(data = dd,aes(x = year,y = COPD,colour = "COPD"),size=3)+
scale_colour_manual("",values = c("Respiratory" = "red","COPD" = "green"))+
xlab("Year")+ylab("Morbidity")+
theme(text=element_text(size=13, family="Comic Sans MS"))
以上為個人經(jīng)驗，希望能給大家一個參考，也希望大家多多支持服務(wù)器之家。如有錯誤或未考慮完全的地方，望不吝賜教。
原文鏈接：https://blog.csdn.net/sinat_41805381/article/details/80319484
