How to add a top level title to multiple plots

How can I add an overall plot title to these four plots? 

I would like to have something that says, "Distribution Comparisons":

title("Distribution Comparisons", outer = TRUE)

But you may have to make room for it with par(oma=...).

  -Peter Ehlers
par(mfrow = c(2, 2))
# Plot 1
plot(rnorm(10),type="l",col="red")
title(main = list(paste("Normal"),
                          col="black", cex = 1.0))

# Plot 2
plot(rpois(10, 4),type="l",col="blue")
title(main = list(paste("Poison"),
                          col="black", cex = 1.0))

# Plot 3
plot(rnbinom(10, mu = 4, size = 100),type="l",col="green")
title(main = list(paste("Binomial"),
                          col="black", cex = 1.0))

# Plot 4
plot(runif(10),type="l",col="black")
title(main = list(paste("Uniform"),
                          col="black", cex = 1.0))

Thanks again for any feedback and insights. 

______________________________________________
R-help at r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

How to add a top level title to multiple plots

Thread (7 messages)