Create Example3.R