I would generally write a function to create the entire first plot, then the entire 2nd plot based on data or other arguments passed in, then in your loop or whatever call the function with the different steps. This will recreate the plots from scratch at each step rather than adding to the existing plots, but often works simpler.
If you really want to add to the plots, here is one way: library(TeachingDemos) plot.new() p1 <- subplot( plot(iris[,1], col='red', ylim=range(iris[,1:2])), x=c(0,1), y=c(0.6,1) ) p2 <- subplot( plot(iris[,3], col='blue', ylim=range(iris[,3:4])), x=c(0,1), y=c(0,0.4) ) par(p1) lines(iris[,2],col="pink",lwd=8) par(p2) lines(iris[,4],col="green",lwd=8) hope this helps, -- Gregory (Greg) L. Snow Ph.D. Statistical Data Center Intermountain Healthcare greg.s...@imail.org 801.408.8111 > -----Original Message----- > From: r-help-boun...@r-project.org [mailto:r-help-boun...@r- > project.org] On Behalf Of pdb > Sent: Wednesday, June 30, 2010 4:27 AM > To: r-help@r-project.org > Subject: [R] plot focus > > > I am doing calculations in a loop and then plotting the results by > adding a > point to each of 2 charts at the end of the loop. Its very informative > as > you can see the progression through time. > > My problem is, if I have 2 plots, I don't know how to get the focus > back to > the first plot. > > layout(matrix(c(1,2))) > > plot(iris[,1],col="red",) #plot1 > plot(iris[,3],col="blue") #plot2 > > #goes on plot2 > lines(iris[,2],col="pink") > > #how do I put this line on plot 1 > lines(iris[,4],col="black") > > > I tried the method below but when you switch the focus back to screen 1 > the > line gets drawn not where I expect > > split.screen(c(2,1)) > screen(1) # prepare screen 1 for output > plot(iris[,1],col="red",) #plot1 > screen(2) # prepare screen 2 for output > plot(iris[,3],col="blue") #plot2 > > screen(1) > lines(iris[,2],col="pink",lwd=8) > > screen(2) > lines(iris[,4],col="green",lwd=8) > > Any pointers please as to what I need to do? > > -- > View this message in context: http://r.789695.n4.nabble.com/plot-focus- > tp2272699p2272699.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. ______________________________________________ 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.
