I will give this a try. However, this is based on row and columns of the panels and not on the SUBJ and DOSE information that I need to calculate the continuous curve. Rene
-----Original Message----- From: Petr Pikal [mailto:[EMAIL PROTECTED] Sent: Thursday, December 14, 2006 1:18 AM To: RMan54; [email protected] Subject: Re: [R] xyplot: discrete points + continuous curve per panel Hi there is probably better solution but you can try to fiidle with this idea, which adds stight lines to each panel one after another. # based on Gabor Grothendieck's code suggestion # adds straight lines to panels in lattice plots addLine<- function(...) { tcL <- trellis.currentLayout() for(i in 1:nrow(tcL)) for(j in 1:ncol(tcL)) if (tcL[i,j] > 0) { trellis.focus("panel", j, i, highlight = FALSE) panel.abline(...) trellis.unfocus() } } You need to change panel.abline(...) part maybe to panel.curve or panel.segments or? HTH Petr On 13 Dec 2006 at 23:22, RMan54 wrote: Date sent: Wed, 13 Dec 2006 23:22:41 -0800 (PST) From: RMan54 <[EMAIL PROTECTED]> To: [email protected] Subject: [R] xyplot: discrete points + continuous curve per panel > > I have a number of x, y observations (Time, Conc) for a number of > Subjects (with subject number Subj) and Doses. I can plot the > individual points with xyplot fine: > > xyplot(Conc ~ Time | Subj, > Groups=Dose, > data=myData, > panel = function(x,y) { > panel.xyplot(x, y) > panel.superpose(???) # Needs more here > } > ) > > I also like to plot on each panel (there is one Subj per panel) a > continuous curve with predictions that I can calculate from a rather > complicated function: > > myPred <- (time, subj, dose) { > returns predicted value of Conc for a given time, subj and dose > } > > The predicted curves are different for each panel. > > How do I plot the predictions? I have tried to add panel.superinpose > in the xyplot portion but can't link to the myPred function. I also > know about panel.curve but couldn't make it work. > > My attempt is to calculate the predictions on the fly. Is this > possible? Or do I need to calculate all predictions first and put the > results in a data frame. Thanks for any help, Rene -- View this > message in context: > http://www.nabble.com/xyplot%3A-discrete-points-%2B-continuous-curve-p > er-panel-tf2818931.html#a7867892 Sent from the R help mailing list > archive at Nabble.com. > > ______________________________________________ > [email protected] 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. Petr Pikal [EMAIL PROTECTED] ______________________________________________ [email protected] 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.
