Create contamination control objects

Description

Create objects of a class inheriting from "ContControl".

Usage

1
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".

Note

This constructor exists mainly for back compatibility with early draft versions of simFrame.

Author(s)

Andreas Alfons

See Also

"DCARContControl", "DARContControl", "ContControl"

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
## 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)

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.