Realizar ajuste de hiperparámetros con mlr

Ahora puedes combinar las funciones y los objetos preparados en el ejercicio anterior para llevar a cabo el ajuste de hiperparámetros con búsqueda aleatoria. El conjunto de datos knowledge_train_data ya está cargado para ti, al igual que los paquetes mlr, tidyverse y tictoc. Además, ya se ha ejecutado el siguiente código:

# Define task
task <- makeClassifTask(data = knowledge_train_data, 
                        target = "UNS")

# Define learner
lrn <- makeLearner("classif.nnet", predict.type = "prob", fix.factors.prediction = TRUE)

# Define set of parameters
param_set <- makeParamSet(
  makeDiscreteParam("size", values = c(2,3,5)),
  makeNumericParam("decay", lower = 0.0001, upper = 0.1)
)