comparison ks_distribution.R @ 47:06461aa190f7 draft

Uploaded

46:399cd9dd2c3e

    return(fx)
}

# Read in the components data.
components_data <- read.delim(opt$components_input, header=TRUE)
number_comp <- opt$number_comp

# Set component colors.
specified_colors <- set_component_colors(opt$colors, number_comp)

# Set pi, mu, var.

47:06461aa190f7

    return(fx)
}

# Read in the components data.
components_data <- read.delim(opt$components_input, header=TRUE)
number_comp <- as.integer(opt$number_comp)

# Set component colors.
specified_colors <- set_component_colors(opt$colors, number_comp)

# Set pi, mu, var.