R - Tiêu đề và chú thích chung cho các ô kết hợp

Question

Tôi muốn biết cách cung cấp tiêu đề và chú giải chung cho các ô kết hợp trong R. Tôi có bốn ô mà tôi đã kết hợp thành một ô. Mỗi ô có tiêu đề riêng của nó. Tôi muốn chỉ định một Tiêu đề phổ biến ở trung tâm trên cùng và chú giải chung ở góc trên cùng bên trái của ô được kết hợp. Tôi tạo ra cốt truyện kết hợp bằng cách sử dụng mệnh(). Tôi đã cung cấp âm mưu của tôi dưới đây

Answer 1

Bạn có thể sử dụng tham số oma để tăng lợi nhuận bên ngoài, sau đó thêm tiêu đề chính với mtext, và cố gắng xác định vị trí huyền thoại bằng tay.

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)