On Sun, Jan 8, 2012 at 9:45 AM, Mike Dahman <mike.dah...@gmail.com> wrote: > I'm hoping the community knowledge can help me out here. I have found great > value in R, especially using it to generate charts, but I am still scaling > the learning curve in a number of ways. > > I am looking plot one grouped line and one ungrouped line in a lattice plot. > > I can plot one grouped line like this (the line's color in each panel > becomes dependent on the newpool value): > > > > xyp<-xyplot(cpucap~date|zone,data=df,type="l",groups=newpool,auto.key=list(points=F,lines=T), > main=paste(df$server[1]," CPU Caps\n",df$date[1]," to > ",df$date[nrow(df)],sep="") > ) > print(xyp) > > > and I can plot two ungrouped lines using a panel=function with subscripts > like this (maybe not the best way, but I found an example doing it this > way): > > xyplot(cpu~dt|zone,data=filt_zone_df,ylim=c(0,100), > main=paste(server," - Zone CPU (Blue) & Memory (Red) > Util\n",filt_zone_df$ts[1],"-",filt_zone_df$ts[nrow(filt_zone_df)],sep=""), > panel=function(x,y,subscripts){ > panel.lines(x,y) > > panel.lines(filt_zone_df$dt[subscripts],filt_zone_df$mem[subscripts],col="red") > }, as.Table=T, subscripts=T) > > > but I'm struggling with plotting one line that is grouped and one that > isn't. When I try to pass group to the first panel.xyplot() function in the > panel=function it either does nothing or bombs out. > > xyplot(cpu~dt|zone,data=servdf,ylim=c(0,100),groups=pool,auto.key=list(points=F,lines=T),type="l", > main="test", > panel=function(x,y,groups,subscripts,...){ > panel.xyplot(x,y,groups,...) # would > like this to be colored based on the groups=pool
Try panel.xyplot(x, y, groups = groups, subscripts = subscripts, ...) -Deepayan > > panel.lines(servdf$dt[subscripts],servdf$mem[subscripts],col="red") > }, as.Table=T, subscripts=T) > > > A little nudge in the right direction is appreciated. I'm getting tripped > up on how to get the groups definition into the panel function and also > into the panel.xyplot function within it. I've tried using a number of > variations in the arguments with the panel=function definition and the call > to panel.xyplot() within it, but no success. My assumption was that the use > of '...' would pass it on down, but that doesn't seem to be the > case, especially since most of the examples I can find from googling show > folks listing group as an argument, and sometimes have something like > groups=groups. I've tried a number of things and thought it is time to ask > for help. > > Regards, > > -mike > > [[alternative HTML version deleted]] > > ______________________________________________ > 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.