data_train <- RKEEL::loadKeelDataset("car_train")
data_test <- RKEEL::loadKeelDataset("car_test")
#Create algorithm
algorithm <- RKEEL::Bayesian_D(data_train, data_test)
#Run algorithm
algorithm$run()
#See results
algorithm$preprocessed_test
Run the code above in your browser using DataLab