spinebil (version 0.1.0)

profileRotation: Test rotation invariance of index functions for selected 2-d data set.

Description

Ideally a projection pursuit index should be roation invariant, we test this explicitly by profiling the index while rotating a distribution.

Usage

profileRotation(d, indexList, indexLabels, n = 200)

Arguments

d

data (2 column matrix containing distribution to be rotated)

indexList

list of index functions to calculate for each entry

indexLabels

labels used in the output

n

number of steps in the rotation (default = 200)

Value

index values for each rotation step

Examples

# NOT RUN {
d <- as.matrix(sinData(2, 1000))
indexList <- list(tourr::holes(), scagIndex("Skinny"), splineIndex())
indexLabels <- c("holes", "skinny", "splines2d")
pRot <- profileRotation(d, indexList, indexLabels)
plotRotation(pRot)
# }