symd_gau_an {noisemodel}

Symmetric/dependent Gaussian attribute noise

Description

Introduction of Symmetric/dependent Gaussian attribute noise into a classification dataset.

Usage

## Default S3 method:
symd_gau_an(x, y, level, k = 0.2, sortid = TRUE, ...)

## S3 method for class 'formula'
symd_gau_an(formula, data, ...)

Arguments

x

a data frame of input attributes.

y

a factor vector with the output class of each sample.

level

a double in [0,1] with the noise level to be introduced.

k

a double in [0,1] with the scale used for the standard deviation (default: 0.2).

sortid

a logical indicating if the indices must be sorted at the output (default: TRUE).

...

other options to pass to the function.

formula

a formula with the output class and, at least, one input attribute.

data

a data frame in which to interpret the variables in the formula.

Details

Symmetric/dependent Gaussian attribute noise corrupts (level·100)% of the samples in the dataset. Their attribute values are modified adding a random value that follows a Gaussian distribution of mean = 0 and and standard deviation = (max-min)·k, being max and min the limits of the attribute domain. For nominal attributes, a random value is chosen.

Value

An object of class ndmodel with elements:

xnoise

a data frame with the noisy input attributes.

ynoise

a factor vector with the noisy output class.

numnoise

an integer vector with the amount of noisy samples per attribute.

idnoise

an integer vector list with the indices of noisy samples per attribute.

numclean

an integer vector with the amount of clean samples per attribute.

idclean

an integer vector list with the indices of clean samples per attribute.

distr

an integer vector with the samples per class in the original data.

model

the full name of the noise introduction model used.

param

a list of the argument values.

call

the function call.

Note

Noise model adapted from the papers in References.

References

X. Huang, L. Shi, and J. A. K. Suykens. Support vector machine classifier with pinball loss. IEEE Transactions on Pattern Analysis and Machine Intelligence, 36(5):984-997, 2014. doi:10.1109/TPAMI.2013.178.

See Also

sym_gau_an, sym_int_an, print.ndmodel, summary.ndmodel, plot.ndmodel

Examples

# load the dataset
data(iris2D)

# usage of the default method
set.seed(9)
outdef <- symd_gau_an(x = iris2D[,-ncol(iris2D)], y = iris2D[,ncol(iris2D)], level = 0.1)

# show results
summary(outdef, showid = TRUE)
plot(outdef)

# usage of the method for class formula
set.seed(9)
outfrm <- symd_gau_an(formula = Species ~ ., data = iris2D, level = 0.1)

# check the match of noisy indices
identical(outdef$idnoise, outfrm$idnoise)