Update quantile_example.r