Re: rainbow in R

[roger bos <roger.bos@gmail.com>]

Jewel,

I haven't tried this myself, but did you try porting the R function
into S+:  Here is the function.  It looks like it woud be straight
forward to get it to run in S+.  If you are having trouble porting it,
than maybe someone can help you with that specific question.

HTH,

Roger


function (n, s = 1, v = 1, start = 0, end = max(1, n - 1)/n, 
    gamma = 1) 
{
    if ((n <- as.integer(n[1])) > 0) {
        if (start == end || any(c(start, end) < 0) || any(c(start, 
            end) > 1)) 
            stop("'start' and 'end' must be distinct and in [0, 1].")
        hsv(h = seq(start, ifelse(start > end, 1, 0) + end, length = n)%%1, 
            s, v, gamma)
    }
    else character(0)
}

On 5/27/05, Jewel Bright <jwlbright@yahoo.com> wrote:
> Dear Friends:
> Is there an S-PLUS function similar or identical to the "rainbow" function
> in R?
> Thanks
> Jewel
> 
> ________________________________
> Yahoo! Mail
> Stay connected, organized, and protected. Take the tour 
> 
>