One function to run pretty_namespace, untangle and makeOxyFile
pretty_sinew(con = NULL, text = NULL, dir.out = NULL, keep.body = TRUE)
character, path to file or directory that contains script, Default: NULL
character, vector that contains script, Default: NULL
character, path to save new R files, Default: NULL
boolean, if TRUE all non-functions will be saved to body.R in the parent directory of dir.out, Default: TRUE
Nothing, side effects is to create files
If dir.out is set to NULL all outputs are redirected into file.path(tempdir(),'sinew')