# NOT RUN {
a <- disord(c(a=1,b=2,c=7))
names(a)
length(a)
sqrt(a)
is.na(a) <- c(FALSE,FALSE,TRUE)
# powers() and vars() in the mvp package return lists; see the vignette
# for more discussion.
l <- disord(list(3,6:9,1:10))
sapply(l,length)
# }
Run the code above in your browser using DataLab