Update Example.R