# NOT RUN {
# create object
o<-ContinuousInsertor(rate=1)
# set length sampling expression via virtual field
o$dist<-expression(rnorm(1,mean=10,sd=4))
# set maxLength
setMaxLength(o, 30)
# plot density
plot(o)
# }
Run the code above in your browser using DataLab