R Code to Import and Untar