bpworkers(SerialParam())
## Not run:
# p <- SnowParam(2L)
# bpworkers(p) # 2 local nodes, communicating via sockets
# bpstart(p) # start cluster
# bplapply(1:10, sqrt, BPPARAM=p)
# bpstop(p) # stop cluster
#
# p <- SnowParam(4L)
# bplapply(1:10, sqrt, BPPARAM=p) # automatically start / stop cluster
# ## End(Not run)
Run the code above in your browser using DataLab