Using S-Plus 2000 on W98 machine I have generated a series of box plots
(bwplot) with the following script, where CROP is a factor with 6 levels, V
is a numeric injury measurement and trtmnt is a factor with 7 levels. Note
that Graph Style has been set to Black & White.
for (i in 1:length(levels(Cropinj$CROP))){
cropid <- levels(Cropinj$CROP)[i]
newgraph <- bwplot(trtmnt~V,
xlim=c(0,100),
#panel=panel.bpplot,
main=list(paste(cropid,"Injury by Treatment | Ap
A"),cex=1.85,adj=.3,font=2),
xlab=list("Crop Injury",cex=1.4),
sub=list("DE-108 Data",cex=1.1,adj=.95),
subset=(CROP==cropid&APCOD=="A"&WAA==2),
data=Cropinj)
print(newgraph)
}
The result is a graphsheet with 6 sheets, each with 7 black boxes as desired
Now to the difficulty, using an idea recently discussed on this list, to
generate each graph on a separate graphsheet I added a graphsheet statement
to the script as follows .
...as above ...
data=Cropinj)
graphsheet(file="file###.sgr")
print(newgraph)
}
The result is 6 separate graph sheets each with a single sheet but with the
boxes drawn as gray, not black as desired. By specifying the color.table
assignments as graphsheet(color.table="0,0,0|0,0,0",file="file###.sgr") I
was able to generate boxes which were black. However, I don't understand
what it is that graphsheet is doing here. Any insight which might be
offered would be most appreciated.
On a somewhat different boxplot-related issue, how would one create solid,
colored boxes using bwplot which are colored according to an associated
factor or as specified directly by the user ? I don't see that "superpose"
can be applied to bwplot.
Thanks in advance for any pointers or solutions. I will summarize
suggestions for the group.
Peter Scherer
Dow AgroSciences
-----------------------------------------------------------------------
This message was distributed by s-news@wubios.wustl.edu. To unsubscribe
send e-mail to s-news-request@wubios.wustl.edu with the BODY of the
message: unsubscribe s-news
|