###################################################
### chunk number 1: 
###################################################
options(width=75)
set.seed(0)
library(fabia)
fabiaVer<-packageDescription("fabia")$Version