[R] function to return plots

Jim Lemon drj|m|emon @end|ng |rom gm@||@com
Fri Jun 12 12:50:41 CEST 2020


Hi Naresh,
The somewhat obscure syntax of lattice.

print(plot.list[[1]])
print(plot.list[[2]])

Jim

On Fri, Jun 12, 2020 at 7:53 PM Naresh Gurbuxani
<naresh_gurbuxani using hotmail.com> wrote:
>
>
> I want to write a function that will return lattice plots.  This simple
> function output a list of two plots.  These plots can be
> individually shown on the console.  But I am unable to put them on two
> panels of a single plot.
>
> What changes do I need to make to this function?
>
> Thanks,
> Naresh
>
> library(lattice)
>
> getPlots <- function(){
>     x <- rnorm(1000)
>     plt1 <- histogram(x)
>     plt2 <- bwplot(x)
>     list(plt1, plt2)
> }
>
> plot.list <- getPlots()
>
> plot.list[1] #Plots graph
> plot.list[2] #Plots graph
>
> plot(plot.list[1], position = c(0, 0, 1, 0.5), more = TRUE) #Error message
> plot(plot.list[2], position = c(0, 0.5, 1, 1), more = FALSE) #Error message
>
> ## Plotting outside function works
> x <- rnorm(1000)
> plt1 <- histogram(x)
> plt2 <- bwplot(x)
> plot(plt1, position = c(0, 0, 1, 0.5), more = TRUE)
> plot(plt2, position = c(0, 0.5, 1, 1), more = FALSE)
>
> ______________________________________________
> R-help using 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.



More information about the R-help mailing list