# NOT RUN {
x = readFASTA(system.file('protseq/P00750.fasta', package = 'BioMedR'))[[1]]
data(AAindex)
AAidxmat = t(na.omit(as.matrix(AAindex[, 7:26])))
scales = extrPCMScales(x, propmat = AAidxmat, pc = 5, lag = 7, silent = FALSE)
# }
Run the code above in your browser using DataLab