search for: pplot

All, I'm trying to set up a function which calls the partialPlot function but am getting an error that I can't seem to solve. Here's a simplified version of the function and error... > pplot <- function(rf,pred.var){partialPlot(x=rf,pred.data=acoust,x.var=pred.var)} > > attach(acoust) > acoust.rf <- randomForest(VocalTF~Cruise+Spot+Spin+Delph+Stripe+Steno+Turs+Gramp+Lags+ + Lisso+FerPsu+Glob+mixspotspin+mixother+mixed+Size, + data=acoust,importance=TRUE,...

...vels(tab$pch))) tab$pch <- as.numeric(as.character(tab$pch)) tab$color <- as.character(tab$color) ylim <- with(tab,tapply(value,method,range)) ylim <- ylim[rep(seq(1,length(ylim)),each = length(unique(tab$scen1)))] tab$method <- factor(tab$method) tab$scen1 <- factor(tab$scen1) pplot <- with(tab,xyplot(value~gen|scen1*method,groups = scen2,as.table = TRUE, color = color,pch = pch, scales = list(alternating = FALSE,y = list(relation = 'free',limits = ylim)), panel = function(x,y,groups,...,subs...

...l="#F0027F")                                       Sys.sleep(interval)   }               } #####run animation Service()   #####save as flash oopt = ani.options(nmax = 6, interval = 1.0) saveSWF(Service(), interval = 2.0, swfname="place.swf", dev = "pdf", filename="Pplot", fmt = "%03d", outdir = getwd(), swftools="C:/Program Files/SWFTools") ani.options(oopt) [[alternative HTML version deleted]]

hi everybody I wonder if there is a simple way, but not simple would be ok too, to customize info/welcome page at session start time? what I'd like to do is to put together simple short howto / dos & don'ts page for users, I'm thinking it would be great if it was possible many thanks [[alternative HTML version deleted]]