PA1_template.R