Classificateur baysien

bayes <- naiveBayes(cible ~ ., data = data)