comparison ks_distribution.R @ 43:5074cb26597a draft

Uploaded

42:60e2cf57f2c1

    }
    else
    {
        # Handle selected colors for components.
        specified_colors <- c()
        cStr <- unlist(colors)
        items <- strsplit(cStr, ",")
        for (item in items)
        {
            specified_colors <- c(specified_colors, item)
        }
        num_colors_specified <- length(specified_colors)

43:5074cb26597a

    }
    else
    {
        # Handle selected colors for components.
        specified_colors <- c()
        items <- strsplit(colors, ",")
        for (item in items)
        {
            specified_colors <- c(specified_colors, item)
        }
        num_colors_specified <- length(specified_colors)