library(fabia) library(Matrix) source("/seppdata/sepp/linkage/release/scripts/funct.R")