R/aa.conservation_first.R

Defines functions aa.conservation_first

Documented in aa.conservation_first

aa.conservation_first <-
function(modal, p, seqlength){
	conserve <- 0
	for(i in 1:seqlength){
		if(modal[i] >= p){
			conserve <- conserve + 1
		}
	}
	return(conserve)
}

Try the VLF package in your browser

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

VLF documentation built on Aug. 18, 2022, 5:06 p.m.