Committing R Code