new file:   R/n2gExtractMeanExpression.R