Create PA1.R