R/aa.MODE.R

Defines functions aa.MODE

Documented in aa.MODE

aa.MODE <-
function(freq.matrix, seqlength){
	sequence.ind <- c("A", "C", "D", "E", "F", "G", "H", "I", "K", "L", "M", "N", "P", "Q", "R", "S", "T", "V", "W", "Y")
	biggest.sequence.num <- c()
	biggest.sequence.aa <- c()
	for(i in 1:seqlength){
		biggest.sequence.num[i] <- which.max(freq.matrix[,i])
		biggest.sequence.aa[i] <- sequence.ind[biggest.sequence.num[i]]
	}
	return(biggest.sequence.aa)
}

Try the VLF package in your browser

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

VLF documentation built on April 12, 2025, 1:22 a.m.