# NOT RUN {
# Initialization of Spectrino
spnNew()
# generate test set
spnOpenTree("<test>")
# save second group under its name;
s1 <- spnSaveGrp(2,"")
# rename "Test2" group to "gassew" and then save it;
s2 <- spnSaveGrp("Test2","gassew")
# save all the groups under their proper names;
spnSaveGrp("*","")
# Release of Spectrino
#spnFree(TRUE)
# }
Run the code above in your browser using DataLab