tests/sim/20210521-sim/run-cnt.R

In jlivsey/Dvar: What the Package Does (One Line, Title Case)

library(Dvar)
library(L1pack)

#' True table
load("true-table.Rdata")

# load marPack object
load('marPack-cnt.RData')

# privacy budget parameters
bpar <- 12
geoMod <- c(.2, .5, .3)
queryMod <- c(.1, .2, .5, .2)

# Run simulation
OUT <-
  Sim6Way(Nrep    = 20,
          intab   = A,
          bpar    = bpar,
          marPack = marPack,
          geoMod  = geoMod,
          queryMod = queryMod)

# Save output
save(OUT, file = "20210524-results-cnt.RData")