lares (version 4.8.4)

ohse: One Hot Smart Encoding (Dummy Variables)

Description

This function lets the user automatically transform a dataframe with categorical columns into numerical by one hot encoding technic.

Usage

ohse(
  df,
  redundant = FALSE,
  drops = TRUE,
  ignore = NA,
  dates = FALSE,
  holidays = FALSE,
  country = "Colombia",
  currency_pair = NA,
  trim = 0,
  limit = 10,
  variance = 0.9,
  other_label = "OTHER",
  sep = "_",
  summary = TRUE
)

Arguments

df

Dataframe

redundant

Boolean. Should we keep redundat columns? i.e. If the column only has two different values, should we keep both new columns?

drops

Boolean. Drop automatically some useless features?

ignore

Vector or character. Which column should be ignored?

dates

Boolean. Do you want the function to create more features out of the date/time columns?

holidays

Boolean. Include holidays as new columns?

country

Character or vector. For which countries should the holidays be included?

currency_pair

Character. Which currency exchange do you wish to get the history from? i.e, USD/COP, EUR/USD...

trim

Integer. Trim names until the nth character

limit

Integer. Limit one hot encoding to the n most frequent values of each column. Set to NA to ignore argument.

variance

Numeric. Drop columns with more than n variance. Range: 0-1. For example: if a variable contains 91 unique different values out of 100 observations, this column will be suppressed if value is set to 0.9

other_label

Character. With which text do you wish to replace the filtered values with?

sep

Character. Separator's string

summary

Boolean. Print a summary of the operations?

See Also

Other Data Wrangling: balance_data(), categ_reducer(), cleanText(), date_cuts(), date_feats(), dateformat(), formatNum(), formatTime(), holidays(), impute(), left(), normalize(), numericalonly(), ohe_commas(), rbind_full(), removenacols(), removenarows(), replaceall(), right(), textFeats(), textTokenizer(), vector2text(), year_month(), year_week()

Other Feature Engineering: date_feats(), holidays()

Other One Hot Encoding: date_feats(), holidays()

Examples

# NOT RUN {
# Example with Dataset 1
data(dft)
dft <- dft[,c(2,3,5,9,11)]

ohse(dft, limit = 3) %>% head(3)
ohse(dft, limit = 3, redundant = TRUE) %>% head(3)

# Getting rid of columns with no (or too much) variance
dft$no_variance1 <- 0
dft$no_variance2 <- c("A", rep("B", nrow(dft) - 1))
dft$no_variance3 <- as.character(rnorm(nrow(dft)))
dft$no_variance4 <- c(rep("A", 20), rnorm(nrow(dft) - 20))
ohse(dft, limit = 3) %>% head(3)
ohse(dft, limit = 3, var = 1) %>% head(3)

# Examples with Dataset 2
data(dfl)
dfl$novar <- "novar"
ohse(dfl, dates = TRUE) %>% head(3)
ohse(dfl, dates = TRUE, ignore = "issued") %>% head(3)

# }
# NOT RUN {
# Include holidays
ohse(dfl, dates = FALSE, holidays = TRUE, country = "Venezuela") %>% head()
# }