# NOT RUN {
# create an alpahabet object
a<-Alphabet(symbols=c(0,1));
# clone object
b<-clone(a)
# compare the two objects
print(a == b)
# modify symbol set in b
b$symbols<-c("AT","GC");
print(a == b)
# }
Run the code above in your browser using DataLab