## create a new rstream object (of subclass rstream.lecuyer)
s <- new("rstream.lecuyer")
## set antithetic flag of rstream object
rstream.antithetic(s) <- TRUE
## get antithetic flag of rstream object
rstream.antithetic(s)Run the code above in your browser using DataLab