Create stacf1.R