changed general work file to a .R file