R/homoP.R
In spiderDev: Species Identity and Evolution in R--development

homoP <- function(sequence, num){
	rleSeq <- rle(as.vector(as.character(sequence)))

	length(which(rleSeq$lengths > num))
}

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

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

Note that we can't provide technical support on individual packages. You should contact the package authors for that.

Try the spiderDev package in your browser