**Nicebread » R**, and kindly contributed to R-bloggers)

Summary: A new function in the WRS package compares many quantiles of two distributions simultaneously while controlling the overall alpha error.

When comparing data from two groups, approximately 99.6% of all psychological research compares the *central tendency* (that is a subjective estimate).

In some cases, however, it would be sensible to compare different parts of the distributions. For example, in reaction time (RT) experiments two groups may only differ in the fast RTs, but not in the long. Measures of central tendency might obscure or miss this pattern, as following example demonstrates.

Imagine RT distributions for two experimental conditions (“black” and “red”). Participants in the red condition have some very fast RTs:

^{?}View Code RSPLUS

set.seed(1234) RT1 <- rnorm(100, 350, 52) RT2 <- c(rnorm(85, 375, 55), rnorm(15, 220, 25)) plot(density(RT1), xlim=c(100, 600)) lines(density(RT2), col=2) |

A naïve (but common) approach would be to compare both distributions with a *t* test:

```
t.test(RT1, RT2)
######################
data: RT1 and RT2
t = -0.3778, df = 168.715, p-value = 0.706
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-22.74478 15.43712
sample estimates:
mean of x mean of y
341.8484 345.5022
```

Results show that both groups do not differ in their central tendency.

**Now let’s do the same with a new method!**

The function `qcomhd`

from the WRS package compares user-defined quantiles of both distributions using a Harrell–Davis estimator in conjunction with a percentile bootstrap. The method seems to improve over other methods: “Currently, when there are tied values, no other method has been found that performs reasonably well. Even with no tied values, method HD can provide a substantial gain in power when q ≤ .25 or q ≥ .75 compared to other techniques that have been proposed”. The method will be described in the forthcoming paper “Comparing two independent groups via the upper and lower quantiles” by Wilcox and Erceg-Hurn.

You can use the function as soon as you install the latest version (17) of the WRS package:

**install.packages(“WRS”, repos=“http://R-Forge.R-project.org”)**

Let’s compare all percentiles from the 10th to the 90th:

`qcomhd(RT1, RT2, q = seq(.1, .9, by=.1))`

The graphical output shows how groups differ in the requested quantiles, and the confidence intervals for each quantile:

The text output (see below) also shows that groups differ significantly in the 10th, the 50th, and the 60th percentile. The column labeled ‘’.value’’shows the p value for a single quantile bootstrapping test. As we do multiple tests (one for each quantile), the overall Type 1 error (defaulting to .05) is controlled by the Hochberg method. Therefore, for each *p* value a critical *p* value is calculated that must be undercut (see column ‘_crit’. The column ‘signify’ marks all tests which fulfill this condition:

```
q n1 n2 est.1 est.2 est.1.est.2 ci.low ci.up p_crit p.value signif
1 0.1 100 100 285.8276 218.4852 67.342399 41.04707 84.67980495 0.005555556 0.001 *
2 0.2 100 100 297.5061 264.7904 32.715724 -16.52601 68.80486452 0.025000000 0.217
3 0.3 100 100 310.8760 320.0196 -9.143593 -33.63576 32.95577465 0.050000000 0.589
4 0.4 100 100 322.5014 344.0439 -21.542475 -40.43463 0.03938696 0.010000000 0.054
5 0.5 100 100 331.4413 360.3548 -28.913498 -44.78068 -9.11259108 0.007142857 0.006 *
6 0.6 100 100 344.8502 374.7056 -29.855369 -46.88886 -9.69559705 0.006250000 0.005 *
7 0.7 100 100 363.6210 388.0228 -24.401872 -47.41493 -4.13498039 0.008333333 0.016
8 0.8 100 100 385.8985 406.3956 -20.497097 -47.09522 2.23935390 0.012500000 0.080
9 0.9 100 100 419.4520 444.7892 -25.337206 -55.84177 11.49107833 0.016666667 0.174
```

To summarize, we see that we have significant differences between both groups: the red group has significantly more faster RTs, but in their central tendency longer RTs.

Recommendations for comparing groups:

- Always plot the densities of both distributions.
- Make a visual scan: Where do the groups differ? Is the central tendency a reasonable summary of the distributions and of the difference between both distributions?
- If you are interested in the central tendency, think about the test for trimmed means, as in most cases this describes the central tendency better than the arithmetic mean.
- If you are interested in comparing quantiles in the
*tails*of the distribution, use the qcomhd function.

**leave a comment**for the author, please follow the link and comment on his blog:

**Nicebread » R**.

R-bloggers.com offers

**daily e-mail updates**about R news and tutorials on topics such as: visualization (ggplot2, Boxplots, maps, animation), programming (RStudio, Sweave, LaTeX, SQL, Eclipse, git, hadoop, Web Scraping) statistics (regression, PCA, time series, trading) and more...