# Example without custom message
pb<-create_pb(length=10, print=FALSE)
summary(pb)
# Example with a custom message
pb<-create_pb(length=43, print=FALSE,custom.message='Custom pb')
summary(pb)
# Example with a custom message and an updated value
pb<-create_pb(length=11, print=FALSE,custom.message='A new value:')
pb<-update_pb(pb,6)
summary(pb)
Run the code above in your browser using DataLab