Create wage_example.R