sdcMicro (version 4.1.0)

dRisk: overal disclosure risk

Description

Distance-based disclosure risk estimation via standard deviation-based intervals around observations.

Usage

dRisk(obj,...)# xm, k = 0.05)

Arguments

obj

original data or object of class sdcMicroObj

...

see possible arguments below

xm

perturbed data

k

percentage of the standard deviation

Value

• The disclosure risk or/and the modified sdcMicroObj

Details

An interval (based on the standard deviation) is built around each value of the perturbed value. Then we look if the original values lay in these intervals or not. With parameter k one can enlarge or down scale the interval.

References

see method SDID in http://vneumann.etse.urv.es/publications/sci/lncs3050Outlier.pdf

See Also

dUtility, dUtility

Examples

data(free1)
m1 <- microaggregation(free1[, 31:34], method="onedims", aggr=3)
m2 <- microaggregation(free1[, 31:34], method="pca", aggr=3)
dRisk(obj=free1[, 31:34], xm=m1$mx)
dRisk(obj=free1[, 31:34], xm=m2$mx)
dUtility(obj=free1[, 31:34], xm=m1$mx)
dUtility(obj=free1[, 31:34], xm=m2$mx)

## for objects of class sdcMicro:
data(testdata2)
sdc <- createSdcObj(testdata2,
  keyVars=c('urbrur','roof','walls','water','electcon','relat','sex'), 
  numVars=c('expend','income','savings'), w='sampling_weight')
## this is already made internally: sdc <- dRisk(sdc)
## and already stored in sdc