# Load sample data
data(sample_data_train)
data(sample_data_extern)
# Example usage with Lasso
result_lasso <- tuneandtrainExt(sample_data_train, sample_data_extern, classifier = "lasso",
maxit = 120000, nlambda = 100)
result_lasso$best_lambda
result_lasso$best_model
result_lasso$final_auc
result_lasso$active_set_Train
# Example usage with Ridge
result_ridge <- tuneandtrainExt(sample_data_train, sample_data_extern,
classifier = "ridge", maxit = 120000, nlambda = 100)
result_ridge$best_lambda
result_ridge$best_model
result_ridge$final_auc
Run the code above in your browser using DataLab