add Report1.R