# Shuffled top 12 commands, subset from com80 (see), saved as binary object with:
# com80 <- read.table("data/com80.txt")
# sample12 <- sample(1:12, 12)
# com12 <- com80[sample12, 2]
# names(com12) <- com80[sample12, 1]
# save(com12, file="data/com12.rd")