## Not run:
# ws <- netWorkSpace('nws example')
#
# # To store value 5 bound to variable 'x' on the netWorkSpace 'ws'
# # (If 'x' was declared, then its mode is inherited,
# # otherwise 'x' uses the default mode 'fifo')
# nwsStore(ws, 'x', 5)
#
# # store 10 values associate with variable y to the netWorkSpace
# for (i in 1:10)
# nwsStore(ws, 'y', i)
#
# # retrieve 10 values associate with variable y from the netWorkSpace
# for (i in 1:10)
# print(nwsFetch(ws, 'y'))
# ## End(Not run)
Run the code above in your browser using DataLab