CRAN Package Check Results for Package sdcMicro

Last updated on 2015-05-29 05:47:44.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 4.5.0 21.97 86.10 108.07 OK
r-devel-linux-x86_64-debian-gcc 4.5.0 21.74 86.28 108.01 OK
r-devel-linux-x86_64-fedora-clang 4.5.0 223.10 OK
r-devel-linux-x86_64-fedora-gcc 4.5.0 210.54 OK
r-devel-osx-x86_64-clang 4.5.0 186.37 OK
r-devel-windows-ix86+x86_64 4.5.0 60.00 177.00 237.00 OK
r-patched-linux-x86_64 4.5.0 20.68 83.71 104.39 OK
r-patched-solaris-sparc 4.5.0 1265.70 ERROR
r-patched-solaris-x86 4.5.0 273.50 OK
r-release-linux-x86_64 4.5.0 21.53 86.00 107.52 OK
r-release-osx-x86_64-mavericks 4.5.0 OK
r-release-osx-x86_64-snowleopard 4.5.0 OK
r-release-windows-ix86+x86_64 4.5.0 64.00 177.00 241.00 OK
r-oldrel-windows-ix86+x86_64 4.5.0 67.00 240.00 307.00 OK

Check Details

Version: 4.5.0
Check: examples
Result: ERROR
    Running examples in ‘sdcMicro-Ex.R’ failed
    The error most likely occurred in:
    
    > ### Name: sdcMicro-package
    > ### Title: Statistical Disclosure Control (SDC) for the generation of
    > ### protected microdata for researchers and for public use.
    > ### Aliases: sdcMicro-package sdcMicro
    > ### Keywords: package
    >
    > ### ** Examples
    >
    > ## example from Capobianchi, Polettini and Lucarelli:
    > data(francdat)
    > f <- freqCalc(francdat, keyVars=c(2,4,5,6),w=8)
    Warning in setkeyv(dt, by) :
     Already keyed by this key but had invalid row order, key rebuilt. If you didn't go under the hood please let datatable-help know so the root cause can be fixed.
    > f
    
     --------------------------
    4 obs. violate 2-anonymity
    8 obs. violate 3-anonymity
     --------------------------
    > f$fk
    [1] 2 2 2 1 1 1 1 2
    > f$Fk
    [1] 110.0 84.5 84.5 17.0 541.0 8.0 5.0 110.0
    > ## with missings:
    > x <- francdat
    > x[3,5] <- NA
    > x[4,2] <- x[4,4] <- NA
    > x[5,6] <- NA
    > x[6,2] <- NA
    > f2 <- freqCalc(x, keyVars=c(2,4,5,6),w=8)
    > f2$Fk
    [1] 149.0 84.5 194.5 563.0 566.0 549.0 22.0 149.0
    > ## individual risk calculation:
    > indivf <- indivRisk(f)
    > indivf$rk
    [1] 0.01714426 0.02204233 0.02204233 0.17707583 0.01165448 0.29706308 0.40235948
    [8] 0.01714426
    > ## Local Suppression
    > localS <- localSupp(f, keyVar=2, indivRisk=indivf$rk, threshold=0.25)
    > f2 <- freqCalc(localS$freqCalc, keyVars=c(2,4,5,6), w=8)
    > indivf2 <- indivRisk(f2)
    > indivf2$rk
    [1] 0.01714426 0.02204233 0.02204233 0.17707583 0.01165448 0.29706308 0.40235948
    [8] 0.01714426
    >
    > ## select another keyVar and run localSupp once again,
    > #if you think the table is not fully protected
    > data(free1)
    > f <- freqCalc(free1, keyVars=1:3, w=30)
    Warning in setkeyv(dt, by) :
     Already keyed by this key but had invalid row order, key rebuilt. If you didn't go under the hood please let datatable-help know so the root cause can be fixed.
    > ind <- indivRisk(f)
    Error in if (fk[k] > 2) { : missing value where TRUE/FALSE needed
    Calls: indivRisk
    Execution halted
Flavor: r-patched-solaris-sparc