Load Packages (.tabset)

haven

# Check if haven is already installed and if it is, load it.
if (!require(haven)){
  # If it's not intalled, then tell R to install it.
  install.packages("haven", dependencies = TRUE)
  # Once it's installed, tell R to load it.
  library(haven)
}

tidyverse

if (!require()){
  install.packages("", dependencies = TRUE)
  library()
}
Loading required package: 
Failed with error:  ‘invalid package name’
Installing package into ‘/cloud/lib/x86_64-pc-linux-gnu-library/4.3’
(as ‘lib’ is unspecified)
Warning in install.packages :
  package ‘’ is not available for this version of R

A version of this package for your version of R might be available elsewhere,
see the ideas at
https://cran.r-project.org/doc/manuals/r-patched/R-admin.html#Installing-packages

summarytools

if (!require()){
  install.packages("", dependencies = TRUE)
  library()
}
Loading required package: 
Failed with error:  ‘invalid package name’
Installing package into ‘/cloud/lib/x86_64-pc-linux-gnu-library/4.3’
(as ‘lib’ is unspecified)
Warning in install.packages :
  package ‘’ is not available for this version of R

A version of this package for your version of R might be available elsewhere,
see the ideas at
https://cran.r-project.org/doc/manuals/r-patched/R-admin.html#Installing-packages

Import Data

dataset <- read_sav("Harry Potter Data.sav")

Codebook

dataset %>%
  select (CoinFlip, FFM_5, Potter1) -> exampleDF

print(dfSummary(exampleDF, graph.magnif = .75), method = 'render')
Error in dfSummary(exampleDF, graph.magnif = 0.75) : 
  could not find function "dfSummary"
LS0tCnRpdGxlOiAiTGVhcm4gUiAtIENyZWF0ZSBDb2RlYm9vayIKb3V0cHV0OiAKICBodG1sX25vdGVib29rOgogICAgdGhlbWU6IHNwYWNlbGFiCiAgICB0b2M6IHllcwogICAgdG9jX2Zsb2F0OiB5ZXMKLS0tCiMgTG9hZCBQYWNrYWdlcyAoLnRhYnNldCkKCiMjIGhhdmVuCgpgYGB7cn0KIyBDaGVjayBpZiBoYXZlbiBpcyBhbHJlYWR5IGluc3RhbGxlZCBhbmQgaWYgaXQgaXMsIGxvYWQgaXQuCmlmICghcmVxdWlyZShoYXZlbikpewogICMgSWYgaXQncyBub3QgaW50YWxsZWQsIHRoZW4gdGVsbCBSIHRvIGluc3RhbGwgaXQuCiAgaW5zdGFsbC5wYWNrYWdlcygiaGF2ZW4iLCBkZXBlbmRlbmNpZXMgPSBUUlVFKQogICMgT25jZSBpdCdzIGluc3RhbGxlZCwgdGVsbCBSIHRvIGxvYWQgaXQuCiAgbGlicmFyeShoYXZlbikKfQpgYGAKCiMjIHRpZHl2ZXJzZQoKYGBge3J9CmlmICghcmVxdWlyZSgpKXsKICBpbnN0YWxsLnBhY2thZ2VzKCIiLCBkZXBlbmRlbmNpZXMgPSBUUlVFKQogIGxpYnJhcnkoKQp9CmBgYAoKIyMgc3VtbWFyeXRvb2xzCgpgYGB7cn0KaWYgKCFyZXF1aXJlKCkpewogIGluc3RhbGwucGFja2FnZXMoIiIsIGRlcGVuZGVuY2llcyA9IFRSVUUpCiAgbGlicmFyeSgpCn0KYGBgCgojIEltcG9ydCBEYXRhCmBgYHtyfQpkYXRhc2V0IDwtIHJlYWRfc2F2KCJIYXJyeSBQb3R0ZXIgRGF0YS5zYXYiKQpgYGAKCiMgQ29kZWJvb2sKCmBgYHtyfQpkYXRhc2V0ICU+JQogIHNlbGVjdCAoQ29pbkZsaXAsIEZGTV81LCBQb3R0ZXIxKSAtPiBleGFtcGxlREYKCnByaW50KGRmU3VtbWFyeShleGFtcGxlREYsIGdyYXBoLm1hZ25pZiA9IC43NSksIG1ldGhvZCA9ICdyZW5kZXInKQpgYGA=