Update gp_example.R