Update preprocessing.r

edited version of preprocessing.r that includes removal of singletons as an option -- two new arguments:

remove_sg                   =TRUE, # boolean to remove singleton counts
                                  sg_threshold                = 1, # rows with a sum of counts equal to or less than this value will be removed if remove_sg=TRUE