## Not run:
# # Create a sleigh with workers on nodes n1 and n2 started via ssh:
# s <- sleigh(launch=sshcmd, nodeList=c('n1', 'n2'))
#
# # Same as previous, but as user 'frank':
# s <- sleigh(launch=sshcmd, nodeList=c('n1', 'n2'), user='frank')
#
# # Create two tunnels from workers n1 and n2 back the nws server
# # on the local machine:
# s <- sleigh(launch=sshforwardcmd, nodeList=c('n1', 'n2'),
# nwsHostRemote='localhost')
#
# # Same as the previous example, but use port 9876 in case either
# # worker machine already has an nws server bound to port 8765:
# s <- sleigh(launch=sshforwardcmd, nodeList=c('n1', 'n2'),
# nwsHostRemote='localhost', nwsPortRemote=9876)
# ## End(Not run)
Run the code above in your browser using DataLab