# NOT RUN {
data(sp5)
# find indices where all specified vars are unique
# these match the indices of all profiles in sp5
# therefore, all profiles in sp5 are unique
all(unique(sp5, vars=c("id","sand","silt","clay") == 1:length(sp5)))
# }
Run the code above in your browser using DataLab