Create General R Work