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

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

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

library(codebook)
library(dplyr)
data("bfi", package = 'codebook')
bfi = bfi %>% haven::zap_missing() %>% haven::as_factor() %>% 
  select(-BFIK_extra, -BFIK_neuro, -BFIK_agree, -BFIK_open, -BFIK_consc)
ggplot2::theme_set(ggplot2::theme_bw())

bfi$age <- rpois(nrow(bfi), 30)
library(ggplot2)
update_geom_defaults("bar", new = list(fill = "blue"))
options(ggplot2.continuous.colour="viridis")

codebook(bfi)

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