R/clustCI.gmyc.R

Defines functions clustCI.gmyc

Documented in clustCI.gmyc

clustCI.gmyc <- function(gmyc){
	aa <- which(gmyc$likelihood >= max(gmyc$likelihood) - 2)
	#bb <- sapply(aa, function(x) length(unique(clustGMYC(gmyc, x))))
	range(aa)
}

Try the spiderDev package in your browser

Any scripts or data that you put into this service are public.

spiderDev documentation built on May 2, 2019, 5:23 p.m.