quantiles code snippets in r