Skip to contents

API stub: implemented via the K2 statistic = Z(skew)^2 + Z(kurt)^2 (D'Agostino & Pearson 1973). Recommended n >= 20.

Usage

dagostino_pearson(x)

Arguments

x

Numeric vector.

Value

An object of class "morie_test_result".

Examples

set.seed(1)
res <- dagostino_pearson(rnorm(100))
res$p_value
#> [1] 0.9338905