Rfolding (version 1.0)

folding.test: Perform the folding test of unimodality

Description

Perform the folding test of unimodality

Usage

folding.test(X)

Arguments

X

$nxd$ matrix (n observations, d dimensions)

Value

1 if unimodal, 0 if multimodal

Examples

# NOT RUN {
library(MASS)
n = 10000
d = 3
mu = c(0,0,0)
Sigma = matrix(c(1,0.5,0.5,0.5,1,0.5,0.5,0.5,1), ncol = d)
X = mvrnorm(n = n, mu = mu, Sigma = Sigma)
m = folding.test(X)

# }