Learning how to create a data codebook

Load Packages

if(!require(haven)){
  install.packages("haven",dependencies = TRUE)
  library(haven)
}
Loading required package: haven
if(!require(tidyverse)){
  install.packages("tidyverse",dependencies = TRUE)
  library(tidyverse)
}
Loading required package: tidyverse
── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
✔ dplyr     1.1.4     ✔ readr     2.1.5
✔ forcats   1.0.0     ✔ stringr   1.5.1
✔ ggplot2   3.5.1     ✔ tibble    3.2.1
✔ lubridate 1.9.3     ✔ tidyr     1.3.1
✔ purrr     1.0.2     
── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()
ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
if(!require(summarytools)){
  install.packages("summarytools",dependencies = TRUE)
  library(summarytools)
}
Loading required package: summarytools
Warning in fun(libname, pkgname): couldn't connect to display ":0"
system might not have X11 capabilities; in case of errors when using dfSummary(), set st_options(use.x11 = FALSE)

Attaching package: 'summarytools'
The following object is masked from 'package:tibble':

    view

Import Data

dataset.spss <- read_sav ("dataset")

Codebook

dataset.spss %>%
  select(CoinFlip, FFM_2, Potter21) -> newVariable

print(dfSummary(newVariable, graph.magnif = .75), method = ‘render’)