## create a new rstream object (of subclass rstream.lecuyer)
s <- new("rstream.lecuyer")
## pack rstream object
rstream.packed(s) <- TRUE
## status of object
rstream.packed(s)
## pack rstream object
rstream.packed(s) <- FALSERun the code above in your browser using DataLab