Create example3a.R