Create example.R