generates_unit_space: Wrapper function to generate a unit space for a family of...

Description Usage Arguments Value See Also Examples

View source: R/wrapper.R

Description

generates_unit_space generates a unit space for a family of Mahalanobis-Taguchi (MT) methods. The unit space of MT method, MTA method or RT method can be generated by passing a method name (character) into a parameter method.

Usage

1
2
generates_unit_space(unit_space_data, method = c("MT", "MTA", "RT"),
  includes_transformed_data = FALSE, ...)

Arguments

unit_space_data

Matrix with n rows (samples) and p columns (variables). Data to generate the unit space. All data should be continuous values and should not have missing values.

method

Character to designate a method. Currently, "MT", "MTA", and "RT" are available.

includes_transformed_data

If TRUE, then the transformed data are included in a return object.

...

Passed to solve for computing the inverse of the correlation matrix in MT and RT method.

Value

A returned object depends on the selected method. See MT, MTA or RT.

See Also

MT, MTA, RT, and solve

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
# 40 data for versicolor in the iris dataset
iris_versicolor <- iris[61:100, -5]

# 10 data for each kind (setosa, versicolor, virginica) in the iris dataset
iris_test <- iris[c(1:10, 51:60, 101:111), -5]

# MT method
unit_space_MT <- generates_unit_space(unit_space_data = iris_versicolor,
                                      method = "MT")

diagnosis_MT <- diagnosis(unit_space = unit_space_MT,
                          newdata = iris_test,
                          threshold = 4)

(diagnosis_MT$distance)
(diagnosis_MT$le_threshold)

# MTA method
unit_space_MTA <- generates_unit_space(unit_space_data = iris_versicolor,
                                       method = "MTA")

diagnosis_MTA <- diagnosis(unit_space = unit_space_MTA,
                           newdata = iris_test,
                           threshold = 0.5)

(diagnosis_MTA$distance)
(diagnosis_MTA$le_threshold)

# RT method
unit_space_RT <- generates_unit_space(unit_space_data = iris_versicolor,
                                      method = "RT")

diagnosis_RT <- diagnosis(unit_space = unit_space_RT,
                          newdata = iris_test,
                          threshold = 0.2)

(diagnosis_RT$distance)
(diagnosis_RT$le_threshold)

okayaa/MT documentation built on March 15, 2021, 8:41 a.m.