# NOT RUN {
# construct a F84 object
p<-F84();
# set/get Kappa
setKappa(p,2)
getKappa(p)
# set/get Kappa via virtual field
p$kappa<-4
p$kappa
# get object summary
summary(p)
# }
Run the code above in your browser using DataLab