Create CRUG example.R