Load Packages

memisc

if (!require(memisc)) {
  install.packages("memisc", dependencies = T)
  library(memisc)
}

haven

library (memisc)
if (!require(haven)) {
  install.packages("haven", dependencies = T)
  library(haven)
}

tideverse

if (!require(tidyverse)) {
  install.packages("tidyverse", dependencies = T)
  library(tidyverse)
}

summarytools

if (!require(summarytools)) {
  install.packages("summarytools", dependencies = T)
  library(summarytools)
}

Import Data

dataset <- women

Generate Codebook

dataset %>%
  select(height, weight) -> customVars

print(dfSummary(customVars, graph.magnif = .75, method = 'render'))
## Data Frame Summary  
## customVars  
## Dimensions: 15 x 2  
## Duplicates: 0  
## 
## -----------------------------------------------------------------------------------------------------
## No   Variable    Stats / Values             Freqs (% of Valid)   Graph           Valid      Missing  
## ---- ----------- -------------------------- -------------------- --------------- ---------- ---------
## 1    height      Mean (sd) : 65 (4.5)       15 distinct values   :               15         0        
##      [numeric]   min < med < max:                                : . . . . . .   (100.0%)   (0.0%)   
##                  58 < 65 < 72                                    : : : : : : :                       
##                  IQR (CV) : 7 (0.1)                              : : : : : : :                       
##                                                                  : : : : : : :                       
## 
## 2    weight      Mean (sd) : 136.7 (15.5)   15 distinct values   : : : :         15         0        
##      [numeric]   min < med < max:                                : : : : .       (100.0%)   (0.0%)   
##                  115 < 135 < 164                                 : : : : :                           
##                  IQR (CV) : 23.5 (0.1)                           : : : : : .                         
##                                                                  : : : : : :                         
## -----------------------------------------------------------------------------------------------------
#print(dfSummary(dataset, graph.magnif = .75, method = 'render')) # to print all columns in dataset