R/add.alpha.r

Defines functions add.alpha

add.alpha <- function(col, alpha=1) {
	apply(sapply(col, col2rgb)/255, 2, function(x) rgb(x[1],x[2],x[3], alpha=alpha))
}
jjlynch2/OsteoSort documentation built on March 9, 2024, 1:48 a.m.