In rubenarslan/codebook: Automatic Codebooks from Metadata Encoded in Dataset Attributes

knitr::opts_chunk$set(warning = FALSE, message = FALSE, error = TRUE)

Load

library(codebook)
results = haven::read_dta("~/research/gss/GSS_stata/GSS7216_R3.DTA")
# results = results[, c(1:10, which(names(results)=="bthgrp3f"))]
results <- results

# dont cache this chunk
library(ggplot2)
theme_set(theme_bw())

options(device = function(file, width = 7, height = 7, ...) {
  cairo_pdf(tempfile(), width = width, height = height, ...)
})
knitr::opts_chunk$set(echo = FALSE, dev = "CairoPNG")
library(future)
plan(multicore(workers = 3))

codebook(results)

rubenarslan/codebook documentation built on Nov. 13, 2022, 12:40 p.m.