## Not run:
#
# ## set custom state variable
# manipulatorSetState("last", x)
#
# ## get custom state variable
# last <- manipulatorGetState("last")
# if ( !is.null(last) ) {
# # do something interesting
# }
#
# ## End(Not run)
Run the code above in your browser using DataLab