Kim,
If you use the S-plus GUI to build the color table and then display the
History window, you can learn about some little-documented commands that
S-plus uses to build the color tables. You can then incorporate these
functions into your own code. Here is an example:
mycolors <- function() {
guiSetOption(option.name="UserColors", value.string="User 1")
guiSetOption(option.name="SchemeColorTableUser",
value.string="20,80,20|30,140,20|50,170,20|80,200,20|120,220,20|250,250,20|2
50,204,20|250,153,20|250,79,20|250,0,20|220,30,70|200,30,100|170,30,150|150,
30,190|150,30,210|0,0,0")
}
The string for value.string can't have any line breaks in it. As usual,
there are no guarantees when working with these internal functions (Version
stability, etc.), but often they let you do things that can't be done any
other way. Good luck.
Alan
Alan Hochberg
Vice President, Research
ProSanos Corp.
225 Market Street
Suite 502
Harrisburg, PA 17101
Tel. 717-635-2124
Fax 717-635-2575
alan.hochberg@prosanos.com
www.prosanos.com
|