Create Codes.R