install.packages("Dvar_0.0.0.9000.tar.gz")
library(Dvar)
library(L1pack)
#' True table
load("true-table.Rdata")
# load marPack object
load('marPack-tr8.RData')
# privacy budget parameters
bpar <- 12
geoMod <- c(0, 0, 1)
queryMod <- c(1/3, 1/3, 1/3, 0)
# Run simulation
OUT <-
Sim6Way(Nrep = 50,
intab = A,
bpar = bpar,
marPack = marPack,
geoMod = geoMod,
queryMod = queryMod)
# Save output
save(OUT, file = "20210629-results-tr8.RData")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.