modified:   R/n2gThreshOutput.R