R: Vuong and Clarke tests

VC.test {gamlss} | R Documentation

## Vuong and Clarke tests

### Description

The Vuong and Clarke tests for GAMLSS fitted models.

### Usage

    VC.test(obj1, obj2, sig.lev = 0.05)

### Arguments

`obj1` | The first fitted gamlss object
`obj2` | The second fitted gamlss object
`sig.lev` | Significance level used for testing.

### Details

The Vuong (1989) and Clarke (2007) tests are likelihood-ratio-based tests for model selection that use the Kullback-Leibler information criterion. The implemented tests can be used for choosing between two bivariate models which are non necessary nested.

In the Vuong test, the null hypothesis is that the two models are equally close to the actual model, whereas the alternative is that one model is closer. The test follows asymptotically a standard normal distribution under the null. Assume that the critical region is `(-c,c)`, where `c` is typically set to 1.96. If the value of the test is greater than `c` then we reject the null hypothesis that the models are equivalent in favour of the model in `obj1`. Vice-versa if the value is smaller than `-c` we reject the null hypothesis that the models are equivalent in favour of the model in `obj2`. If the value falls within `(-c,c0)` then we cannot discriminate between the two competing models given the data.

In the Clarke test, if the two models are statistically equivalent then the log-likelihood ratios of the observations should be evenly distributed around zero and around half of the ratios should be larger than zero. The test follows asymptotically a binomial distribution with parameters n and 0.5. Critical values can be obtained as shown in Clarke (2007). Intuitively, the model in `obj1` is preferred over that in `obj2` if the value of the test is significantly larger than its expected value under the null hypothesis ('coden/2), and vice versa. If the value is not significantly different from `n/2` then `obj1` can be thought of as equivalent to `obj2`.

### Value

For the Vuong test it returns its value and the decision and for the Clarke test returns the value the p-value and the decision. Decisions criteria are as discussed above.

### Author(s)

Mikis Stasinopoulos and Giampierro Marra

### References

Clarke K. (2007), A Simple Distribution-Free Test for Non-Nested Model Selection. Political Analysis, 15, 347-363.

Rigby, R. A., Stasinopoulos, D. M., Heller, G. Z., and De Bastiani, F. (2019) Distributions for modeling location, scale, and shape: Using GAMLSS in R, Chapman and Hall/CRC. An older version can be found in https://www.gamlss.com/.

Stasinopoulos D. M. Rigby R.A. (2007) Generalized additive models for location scale and shape (GAMLSS) in R. Journal of Statistical Software, Vol. 23, Issue 7, Dec 2007, https://www.jstatsoft.org/v23/i07/.

Stasinopoulos D. M., Rigby R.A., Heller G., Voudouris V., and De Bastiani F., (2017) Flexible Regression and Smoothing: Using GAMLSS in R, Chapman and Hall/CRC.

(see also https://www.gamlss.com/).

Vuong Q.H. (1989), Likelihood Ratio Tests for Model Selection and Non-Nested Hypotheses. Econometrica, 57(2), 307-333.

### See Also

`LR.test`

### Examples

    library(gamlss)
    # fitting different models
    m0 <- gamlss(y~x+qrt, data=aids, family=PO)
    m1 <- gamlss(y~pb(x)+qrt, data=aids, family=PO)
    m2 <- gamlss(y~pb(x)+qrt, data=aids, family=NBI)
    # comparison of the mdels
    VC.test(m0,m2)
    VC.test(m0,m1)
    VC.test(m1,m2)

[Package gamlss version 5.3-2 Index]