# NOT RUN {
data <- RemixAutoML::FakeDataGenerator(
Correlation = 0.85,
N = 25000,
ID = 2L,
ZIP = 0,
FactorCount = 10L,
AddDate = FALSE,
Classification = FALSE,
MultiClass = FALSE)
# Create dummy variables
data <- RemixAutoML::DummifyDT(
data = data,
cols = c("Factor_1",
"Factor_2",
"Factor_3",
"Factor_4",
"Factor_5",
"Factor_6",
"Factor_8",
"Factor_9",
"Factor_10"),
TopN = c(rep(3,9)),
KeepFactorCols = TRUE,
OneHot = FALSE,
SaveFactorLevels = TRUE,
SavePath = getwd(),
ImportFactorLevels = FALSE,
FactorLevelsList = NULL,
ClustScore = FALSE,
ReturnFactorLevels = FALSE)
# Create Fake Data for Scoring Replication
data <- RemixAutoML::FakeDataGenerator(
Correlation = 0.85,
N = 25000,
ID = 2L,
ZIP = 0,
FactorCount = 10L,
AddDate = FALSE,
Classification = FALSE,
MultiClass = FALSE)
# Scoring Version
data <- RemixAutoML::DummifyDT(
data = data,
cols = c("Factor_1",
"Factor_2",
"Factor_3",
"Factor_4",
"Factor_5",
"Factor_6",
"Factor_8",
"Factor_9",
"Factor_10"),
TopN = c(rep(3,9)),
KeepFactorCols = TRUE,
OneHot = FALSE,
SaveFactorLevels = TRUE,
SavePath = getwd(),
ImportFactorLevels = TRUE,
FactorLevelsList = NULL,
ClustScore = FALSE,
ReturnFactorLevels = FALSE)
# }
Run the code above in your browser using DataLab