If it's specifically drawing the grid that's the trouble, I think the
simplest approach is to use the grid() function in the base graphics
package.


Kyle H. Ambert
Fellow, National Library of Medicine
Department of Medical Informatics & Clinical Epidemiology
Oregon Health & Science University

On Tue, Apr 6, 2010 at 7:52 PM, Daniel Malter <daniel@umd.edu> wrote:

>
> Hi, nothing customized is effortless. It typically requires a bit of coding
> unless you are lucky and somebody has implemented it in some package (you
> just have to find the package). But it's not that difficult to do it
> yourself. It just requires figuring out where the lines should be placed,
> which is easy given that you know where your box is placed. So you just
> need
> to take the terciles of your ylims and xlims and place the lines there.
> Below is one approach (probably not the most elegant).
>
> xl=c(-1.5,1.5)
> yl=c(0,5)
> rect.x=c(1,1,-1,-1,1)
> rect.y=c(1.5,3.5,3.5,1.5,1.5)
>
> plot(NULL,xlim=xl, ylim=yl)
> lines(rect.x,rect.y, col=c("red"))
>
> denominator=3
> nominator=seq(from=1, to=denominator-1, by=1)
>
> seq.rect.x=(max(rect.x)-min(rect.x))*(nominator/denominator)
> seq.rect.y=(max(rect.y)-min(rect.y))*(nominator/denominator)
>
> x.coord=min(rect.x)+seq.rect.x
> y.coord=min(rect.y)+seq.rect.y
>
> lines(rep(x.coord[1],2),rep(c(min(rect.y),max(rect.y))),col="blue")
> lines(rep(x.coord[2],2),rep(c(min(rect.y),max(rect.y))),col="blue")
> lines(rep(c(min(rect.x),max(rect.x))),rep(y.coord[1],2),col="blue")
> lines(rep(c(min(rect.x),max(rect.x))),rep(y.coord[2],2),col="blue")
>
> HTH,
> Daniel
>
>
> --
> View this message in context:
> http://n4.nabble.com/Quartering-a-plot-tp1753760p1753790.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> R-help@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]]

