# NOT RUN {
# create a sequence object and attach processes
p<-JC69()
s<-Sequence(
length=4,
alphabets=list(NucleotideAlphabet()),
processes=list(list(p,K80()),list(p))
)
# get the unique list of attached Process instances
getUniqueProcesses(s)
# via virtual field
s$uniqueProcesses
# }
Run the code above in your browser using DataLab