# NOT RUN {
# create objects
a<-AminoAcidAlphabet()
p<-Process()
# assotiate p with Alphabet object a
setAlphabet(p,a)
p$alphabet
# assotiate p with a new NucleotideAlphabet via virtual field
p$alphabet<-NucleotideAlphabet()
p$alphabet
# }
Run the code above in your browser using DataLab