## Not run:
# #G is a GatingSet
# save_gs(G,path="tempFolder")
# G1<-load_gs(path="tempFolder")
#
# #G is a GatingSet
#
# save_gslist(gslist1,path="tempFolder")
# gslist2<-load_gslist(path="tempFolder")
# ## End(Not run)
Run the code above in your browser using DataLab