simFrame (version 0.5.0)

ContControl: Create contamination control objects

Description

Create objects of a class inheriting from "ContControl".

Usage

ContControl(..., type = c("DCAR", "DAR"))

Arguments

...

arguments passed to new("DCARContControl", ...) or new("DARContControl", ...), as determined by type.

type

a character string specifying whether a control object of class "DCARContControl" or "DARContControl" should be created.

Value

• If type = "DCAR", an object of class "DCARContControl".

  If type = "DAR", an object of class "DARContControl".

See Also

"DCARContControl", "DARContControl", "ContControl"

Examples

## distributed completely at random
data(eusilcP)
sam <- draw(eusilcP[, c("id", "eqIncome")], size = 20)
dcarc <- ContControl(target = "eqIncome", epsilon = 0.05, 
    dots = list(mean = 5e+05, sd = 10000), type = "DCAR")
contaminate(sam, dcarc)

## distributed at random
require(mvtnorm)
mean <- rep(0, 2)
sigma <- matrix(c(1, 0.5, 0.5, 1), 2, 2)
foo <- generate(size = 10, distribution = rmvnorm, 
    dots = list(mean = mean, sigma = sigma))
darc <- ContControl(target = "V2", epsilon = 0.2, 
    fun = function(x) x * 100, type = "DAR")
contaminate(foo, darc)