Я хотел бы знать, как предоставить общее название и легенду для комбинированных графиков в R. У меня есть четыре сюжета, которые я объединил в один. Каждый сюжет имеет свое название. Я хочу указать общий заголовок в верхнем центре и общую легенду в верхнем левом углу комбинированного сюжета. Я создал комбинированный график, используя par(). Я предоставил свой сюжет ниже 
R - Общее название и легенда для комбинированных графиков
Ответ 1
Вы можете использовать параметр oma для увеличения внешних полей,
затем добавьте основной заголовок с помощью mtext,
и попытайтесь расположить легенду вручную.
op <- par(
oma=c(0,0,3,0),# Room for the title and legend
mfrow=c(2,2)
)
for(i in 1:4) {
plot( cumsum(rnorm(100)), type="l", lwd=3,
col=c("navy","orange")[ 1+i%%2 ],
las=1, ylab="Value",
main=paste("Random data", i) )
}
par(op) # Leave the last plot
mtext("Main title", line=2, font=2, cex=1.2)
op <- par(usr=c(0,1,0,1), # Reset the coordinates
xpd=NA) # Allow plotting outside the plot region
legend(-.1,1.15, # Find suitable coordinates by trial and error
c("one", "two"), lty=1, lwd=3, col=c("navy", "orange"), box.col=NA)