powered by
profiles
get.labels(freqs)
data(freqsNLsgmplus) x<- sample.profiles(1,freqsNLsgmplus) labels <- get.labels(freqsNLsgmplus) stopifnot(identical(labels,get.labels(get.freqs(x))))
Run the code above in your browser using DataLab