if (FALSE) {
cds = makeExampleComradesDataSet()
clusteredCds = clusterComrades(cds,
cores = 1,
stepCount = 1,
clusterCutoff = 0)
trimmedClusters = trimClusters(clusteredCds = clusteredCds,
trimFactor = 1,
clusterCutoff = 0)
fasta = paste(c(rep('A',25),
rep('T',25),
rep('A',10),
rep('T',23)),collapse = "")
header = '>transcript1'
fastaFile = tempfile()
writeLines(paste(header,fasta,sep = "\n"),con = fastaFile)
rnaRefs = list()
rnaRefs[[rnas(cds)]] = read.fasta(fastaFile)
rnaRefs
foldedCds = foldComrades(trimmedClusters,
rnaRefs = rnaRefs,
start = 1,
end = 83,
shape = 0,
ensembl = 5,
constraintNumber = 1,
evCutoff = 1)
foldedCds
}
Run the code above in your browser using DataLab