Create QualityTools.R