# NOT RUN {
# create F84 object
p<-F84()
# set/get rate parameters
setRateParamList(p,list("Kappa"=3))
getRateParamList(p)
# set/get rate parameters via virtual field
p$rateParamList<-list("Kappa"=2.5)
p$rateParamList
# get object summary
summary(p)
# }
Run the code above in your browser using DataLab