# MosesTest

0th

Percentile

##### Moses Test of Extreme Reactions

Perform Moses test of extreme reactions, which can be used to determine the difference in range between two samples. The exact one-tailed probability is calculated.

Keywords
htest
##### Usage
MosesTest(x, ...)
"MosesTest"(x, y, extreme = NULL, ...)
"MosesTest"(formula, data, subset, na.action, ...)
##### Arguments
x
numeric vector of data values. x will be treated as control group. Non-finite (e.g. infinite or missing) values will be omitted.
y
numeric vector of data values. y will be treated as experiment group. Non-finite (e.g. infinite or missing) values will be omitted.
formula
a formula of the form lhs ~ rhs where lhs gives the data values and rhs the corresponding groups.
data
an optional matrix or data frame (or similar: see model.frame) containing the variables in the formula formula. By default the variables are taken from environment(formula).
subset
an optional vector specifying a subset of observations to be used.
na.action
a function which indicates what should happen when the data contain NAs. Defaults to getOption("na.action").
extreme
integer, defines the number of extreme values to be dropped from the control group before calculating the span. Default (NULL) is the integer part of 0.05 * length(x) or 1, whichever is greater. If extreme is too large, it will be cut down to floor(length(x)-2)/2.
...
further arguments to be passed to or from methods.
##### Details

For two independent samples from a continuous field, this tests whether extreme values are equally likely in both populations or if they are more likely to occur in the population from which the sample with the larger range was drawn.

Note that the ranks are calculated in decreasing mode.

##### Value

A list with class “htest” containing the following components:

##### References

Moses, L.E. (1952) A Two-Sample Test, Psychometrika, 17, 239-247.

wilcox.test, ks.test

##### Aliases
• MosesTest
• MosesTest.default
• MosesTest.formula
##### Examples
x <- c(0.80, 0.83, 1.89, 1.04, 1.45, 1.38, 1.91, 1.64, 0.73, 1.46)
y <- c(1.15, 0.88, 0.90, 0.74, 1.21)

MosesTest(x, y)

set.seed(1479)
x <- sample(1:20, 10, replace=TRUE)
y <- sample(5:25, 6, replace=TRUE)

MosesTest(x, y)

Documentation reproduced from package DescTools, version 0.99.19, License: GPL (>= 2)

### Community examples

Looks like there are no examples yet.