working directory in r how to read and write data