data("mod.intro")
## get the name of mod.intro:
name(mod.intro)
## I don't like the name, let's change it:
name(mod.intro) <- "I like this name better"
## Note that the provided name was too long and is truncated:
name(mod.intro)
## print all sample names in the module:
unlist(lapply(as.list(1:31), function(x)
name(PTSample(mod.intro, x))))
Run the code above in your browser using DataLab