On 9/13/07, Sebastian Weber <[EMAIL PROTECTED]> wrote:
> Dear list,
>
> I'm trying to produce a plot via xyplot with minimal sourounding white
> space. However, I cannot find the options in xyplot, ps.options or
> wherever which prevents lattice from drawing quite some white space
> around my plot. However, this is quite a problem for me as I want to
> produce an inset plot inside another lattice-plot. I'm using the panel
> function to open a viewport and print the inset plot within the actual
> plot. The problem now is, that there is lots of sourounding white space
> around my inner plot. Here is an example:
>
> panel.inset <- function(...,
> inset,
> drawRect=TRUE,
> ixpos=unit(0, "mm"), iypos=unit(1, "npc"),
> ijust=c("left","top"),
> iwidth=unit(0.7, "npc"), iheight=unit(0.5,
> "npc")) {
> ## open our viewport ...
> pushViewport(viewport(x=ixpos, y=iypos, width=iwidth, height=iheight,
> just=ijust, name="inset"))
>
> if(drawRect)
> grid.rect(gp=gpar(lwd=1,col="black"))
>
> ## ... and place the other plot inside there
> print(inset, newpage=FALSE, prefix="insetPlot")
>
> upViewport()
>
> ## draw the actual plot
> panel.xyplot(...)
>
> ## why is this neccessary?? Otherwise I get no lines for the axis ...
> grid.rect(gp=gpar())
> }
>
> x<-0:10
> y<-x^4
>
>
> insetPlot <- xyplot(y ~ x, scales=list(log=T), main=NULL, aspect="fill")
> xyplot(y ~ x, panel="panel.inset", inset=insetPlot)
>
> Thank you very much for any input!
See
str(trellis.par.get("layout.widths"))
str(trellis.par.get("layout.heights"))
?trellis.par.set
?xyplot (the entry for 'par.settings')
-Deepayan
______________________________________________
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.
