# NOT RUN {
# Initialization of Spectrino
spnNew()
# generate test set
spnOpenTree("<test>")
# if "Test2" is the second group, and "test23" - the third spec in it
v1 <- spnGetSpc(2,3)
# is equivalent to
v1 <- spnGetSpc("Test2","test23")
# Release of Spectrino
#spnFree(TRUE)
# }
Run the code above in your browser using DataLab