updated roxygen for PAR2
removed unnecessary code
Added a return()
New idea for speed