# NOT RUN {
# 1 - generates 5 random sequences of length from 1 to 15 with
# symbols a,b,c,d.(order = 0)
geneseq(5,1,15,dico=letters[1:4])
mat<-data.frame(id=letters[1:3],a=c(0,0.75,0.25),b=c(0.5,0.25,0.25),
c=c(0.1,0.8,0.1))
# 2 - generates 2 random sequences of length 10 with symbols a,b,c,d
# according to the transition matrix mat
geneseq(2,10,10,order=1,mattrans=mat)
# }
Run the code above in your browser using DataLab