###################################################
### chunk number 1: 
###################################################
#line 34 "vignettes/GeneRfold/inst/doc/GeneRfold.Rnw"
library(GeneRfold)
s <- "TTAGCTCAATTGGTAAAGACCCTAGGCGAAGCTTAGAGGTCGCCGGTT"
fold(s)


###################################################
### chunk number 2: 
###################################################
#line 45 "vignettes/GeneRfold/inst/doc/GeneRfold.Rnw"
s <- "TTAGCTCAATTGGTAAAGACCCTAGGCGAAGCTTAGAGGTCGCCGGTT"
dotPlot(s,file="dot.ps")
rnaPlot(s,file="rna.ps")