Bonjour,
J'ai un jeu de données discrétisé sur lequel je souhaite appliquer la fonction CBA() du package arulesCBA mais j'obtiens cette erreur :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 > phishing$partie$train$CBA <- prediction(phishing$partie$train$discretize) Error in data.frame(..., check.names = FALSE) : arguments imply differing number of rows: 5528, 0
J'ai un autre jeu de données sur lequel j'ai appliqué la fonction CBA() et je n'ai eu aucun message d'erreur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 prediction <- function(discretize_data) { debut <- proc.time() data_CBA <- CBA(class ~ .,data=discretize_data, supp = 0.20, conf=0.8, lhs.support = TRUE) resultat <- predict(data_CBA, discretize_data) print((proc.time() - debut)[3]) return(resultat) } wine$partie$train$CBA <- prediction(wine$partie$train$discretize) # wine$partie$train$discretize: dimension 89, 14 ; classe: data.frame phishing$partie$train$CBA <- prediction(phishing$partie$train$discretize) # phishing$partie$train$discretize: dimension 5528, 31 ; classe: data.frame
Partager