[R] [FORGED] Re: lattice: control panel extent on device

[Paul Murrell]

Hi

Does this do what you want ?

library(latticeExtra)
c(vol_p, xy_p, x.same=TRUE)

Paul

On 26/10/16 04:30, Ben Tupper wrote:
> Thanks, Bert.
>
> I have used latticeExtra for layering graphics.  I'm not sure how I
> would use it to align graphics rather superimposing them.
>
> I shall look into the the custom panel plot but that is very new
> territory for me.
>
> Ben
>
>> On Oct 25, 2016, at 9:13 AM, Bert Gunter <bgunter.4567 at gmail.com>
>> wrote:
>>
>> Write a custom panel function for levelplot() that calls
>> panel.xyplot after panel.levelplot. I believe this can also be done
>> by the +  operator of the latticeExtra package.
>>
>> You do *not* want to call xyplot after levelplot, as that
>> completely redraws the plot.
>>
>> Cheers, Bert
>>
>>
>> On Oct 25, 2016 2:55 PM, "Ben Tupper" <btupper at bigelow.org
>> <mailto:btupper at bigelow.org>> wrote: Hello,
>>
>> I am drawing a levelplot and an xyplot on a single device as shown
>> in the runnable example below.  I would like the x axes to align -
>> that is for them to cover the same extent left-to-right on the
>> device. How do I go about doing that?
>>
>> ####### # START ####### library(lattice)
>>
>> d <- dim(volcano) xy <- data.frame(x = 1:d[1], y = volcano[,30] )
>>
>> vol_p <- levelplot(volcano) xy_p <- xyplot(y ~ x, data = xy)
>>
>> print(vol_p, split = c(1, 2, 1, 2), more = TRUE) print(xy_p,  split
>> = c(1, 1, 1, 2), more = FALSE) ###### #END ######
>>
>>
>> Thanks! Ben
>>
>>
>>> sessionInfo()
>> R version 3.3.1 (2016-06-21) Platform: x86_64-apple-darwin13.4.0
>> (64-bit) Running under: OS X 10.11.6 (El Capitan)
>>
>> locale: [1]
>> en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8
>>
>> attached base packages: [1] stats     graphics  grDevices utils
>> datasets  methods   base
>>
>> other attached packages: [1] lattice_0.20-33
>>
>> loaded via a namespace (and not attached): [1] tools_3.3.1
>> grid_3.3.1
>>
>>
>>
>> Ben Tupper Bigelow Laboratory for Ocean Sciences 60 Bigelow Drive,
>> P.O. Box 380 East Boothbay, Maine 04544 http://www.bigelow.org
>> <http://www.bigelow.org/>
>>
>> ______________________________________________ R-help at r-project.org
>> <mailto:R-help at r-project.org> mailing list -- To UNSUBSCRIBE and
>> more, see https://stat.ethz.ch/mailman/listinfo/r-help
>> <https://stat.ethz.ch/mailman/listinfo/r-help> PLEASE do read the
>> posting guide http://www.R-project.org/posting-guide.html
>> <http://www.r-project.org/posting-guide.html> and provide
>> commented, minimal, self-contained, reproducible code.
>>
>
> Ben Tupper Bigelow Laboratory for Ocean Sciences 60 Bigelow Drive,
> P.O. Box 380 East Boothbay, Maine 04544 http://www.bigelow.org
>
>
>
>
> [[alternative HTML version deleted]]
>
> ______________________________________________ R-help at r-project.org
> mailing list -- To UNSUBSCRIBE and more, see
> 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.
>

-- 
Dr Paul Murrell
Department of Statistics
The University of Auckland
Private Bag 92019
Auckland
New Zealand
64 9 3737599 x85392
paul at stat.auckland.ac.nz
http://www.stat.auckland.ac.nz/~paul/