Skip to content

Instantly share code, notes, and snippets.

@MilesMcBain
Last active September 22, 2016 02:08
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save MilesMcBain/d47e86ecf61529b4b851f0bb1f4320b8 to your computer and use it in GitHub Desktop.
Save MilesMcBain/d47e86ecf61529b4b851f0bb1f4320b8 to your computer and use it in GitHub Desktop.
library(readr)
library(dplyr)
library(caret)
# from: https://archive.ics.uci.edu/ml/machine-learning-databases/00222/
bank_data <- read_delim("~/Downloads/bank-additional/bank-additional/bank-additional-full.csv", delim=";")
bank_data <- bank_data[-caret::nearZeroVar(bank_data)]
dummy_var_obj <-
bank_data %>%
caret::dummyVars(formula = y ~ .,
data = .)
bank_design_matrix <- predict(dummy_var_obj, newdata = bank_data)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment