Multiple plots; single x(y) labels
Gurmeet, I think Xin is more interested in the common axes, rather than just one single xlab or ylab. Jim's solution is much more fancier than mine :-) ...Tao ----- Original Message ----
From: Gurmeet <r.emailing.list at gmail.com> To: Jim Lemon <jim at bitwrit.com.au> Cc: r-help at r-project.org Sent: Fri, May 14, 2010 10:00:03 AM Subject: Re: [R] Multiple plots; single x(y) labels Hi Xin,
Or, just try adding "oma" and "mtext"
commands:
?par ?mtext #
Code
par(mfcol=c(2,2)) par(oma=c(2,2,0,0)) plot(x <- sort(rnorm(7)),
type = "s", main = "", ylab="", xlab="")
plot(x <- sort(rnorm(27)), type =
"s", main = "", ylab="", xlab="")
plot(x <- sort(rnorm(47)), type = "s",
main = "", ylab="", xlab="")
plot(x <- sort(rnorm(67)), type = "s", main =
"", ylab="", xlab="")
mtext("One x-label", side = 1,
outer=TRUE)
mtext("One y-label", side = 2,
outer=TRUE)
~Gurmeet On Fri, May 14, 2010 at 4:14 AM, Jim
Lemon < href="mailto:jim at bitwrit.com.au">jim at bitwrit.com.au> wrote:
On 05/14/2010 02:04 AM, Xin Ge wrote:
Hi
All,
Can anyone please help me with getting a single x
and y-axis label while
plotting muliple plots. Here is the
code:
par(mfcol=c(2,2)) plot(x<-
sort(rnorm(7)), type = "s", main = "", ylab="", xlab="")
plot(x<-
sort(rnorm(27)), type = "s", main = "", ylab="", xlab="")
plot(x<- sort(rnorm(47)), type = "s", main = "", ylab="", xlab="")
plot(x<- sort(rnorm(67)), type = "s", main = "",
ylab="", xlab="")
also, how can remove x-tick lables
using plot()?
Hi Xin,
Fortunately, this
wheel is pretty easy to reinvent:
require(plotrix)
x1<-rnorm(7)
x2<-rnorm(27)
x3<-rnorm(47)
x4<-rnorm(67)
allxlim<-c(1,67)
allylim<-range(c(x1,x2,x3,x4))
panes(matrix(1:4,nrow=2,byrow=TRUE),widths=c(1.1,1),
heights=c(1,1.1))
par(mar=c(0,4,2,0))
plot(sort(x1),xlim=allxlim,ylim=allylim,type="s",
main="",ylab="",xlab="",xaxt="n")
tab.title("Plot of
x1",tab.col="orange")
par(mar=c(0,0,2,1))
plot(sort(x2),xlim=allxlim,ylim=allylim,type="s",
main="",ylab="",xlab="",xaxt="n",yaxt="n")
tab.title("Plot of
x2",tab.col="orange")
par(mar=c(4,4,2,0))
plot(sort(x3),xlim=allxlim,ylim=allylim,type="s",
main="",ylab="",xlab="")
tab.title("Plot of
x3",tab.col="orange")
par(mar=c(4,0,2,1))
plot(sort(x4),xlim=allxlim,ylim=allylim,type="s",
main="",ylab="",xlab="",yaxt="n")
tab.title("Plot of
x4",tab.col="orange")
Jim
______________________________________________ ymailto="mailto:R-help at r-project.org" href="mailto:R-help at r-project.org">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.
[[alternative HTML version
deleted]]
______________________________________________
ymailto="mailto:R-help at r-project.org" href="mailto:R-help at r-project.org">R-help at r-project.org mailing list
href="https://stat.ethz.ch/mailman/listinfo/r-help" target=_blank
PLEASE do read the posting
guide
and provide commented,
minimal, self-contained, reproducible code.