Bonjour, je voudrais utiliser les réseaux de neurones pour valider une classification déjà faite à l'aide de matrice de confusion.
Je ne comprends pas cette erreur.
Merci d'avance pour votre aide

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
18
19
20
 
 
E=kmeans(z,5)
S=E$cluster
T=class.ind(S)
n=3853
x<- cbind(gain,taille)
xs <-data.frame(scale(x, center =TRUE, scale=TRUE))
samp <- c(sample(1:n,1626))
 
> # classif par modéle logistique
> logis<- multinom(T~.,data=xs, subset= samp) 
# weights:  20 (12 variable)
initial  value 2616.946046 
iter  10 value 2472.870549
final  value 2466.730138 
converged
> applog <- predict(logis,xs[samp,], type = "class")
> table(C[samp], applog)
Error in C[samp] : object of type 'closure' is not subsettable