# NOT RUN {
# Initialization of Spectrino
spnNew()
# generate test set
spnOpenTree("<test>")
# empty the whole list of groups
spnDelGrp("*")
# creates a new group;
# the directory must exists and the spec files must be in it
# i1 <- spnOpenGrp("D:/Prime/Data/Oils.sgr", TRUE)
# opens "Test2.sgr" file from current spec-tree directory
i2 <- spnOpenGrp("Test2", FALSE)
# Release of Spectrino
#spnFree(TRUE)
# }
Run the code above in your browser using DataLab