Convenience wrapper around jitter() to add a layer of anonymity to a query. This can be used in combination with anonymise() to produce a demo dataset from real data.

jitter_metrics(data, cols = NULL, ...)

Arguments

data

Data frame containing a query.

cols

Character vector containing the metrics to jitter. When set to NULL (default), all numeric columns in the data frame are jittered.

...

Additional arguments to pass to jitter().

See also

anonymise

Examples

jittered <- jitter_metrics(sq_data, cols = "Collaboration_hours")
head(
  data.frame(
    original = sq_data$Collaboration_hours,
    jittered = jittered$Collaboration_hours
  )
)
#>   original jittered
#> 1 18.77802 18.77978
#> 2 13.32183 13.32007
#> 3 25.26785 25.26751
#> 4 11.70833 11.70635
#> 5 16.44279 16.44408
#> 6 18.55994 18.56063