Format R Code Automatically