arguments imply differing number of rows
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:
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:
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 |