# NOT RUN {
# Initialization of Spectrino
spnNew()
# generate test set
spnOpenTree("<test>")
# the logical vector of checked spec of the first group
bv1 <- spnGetSpcChecked(1)
# Release of Spectrino
#spnFree(TRUE)
# }
Run the code above in your browser using DataLab