Discussion :

[flourangel]

Bonjour,
J'essaie de construire un réseau de neurones en utilisant un ensemble de données : "train", mais j'ai obtenu une erreur que je n'ai pas comprise :

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
21
22
23
24
25
26
27
28
29
30
31
32
33
 
> library(deal)
 
Attachement du package : ‘deal’
 
The following object(s) are masked from ‘package:rpart’:
 
    post
 
Message d'avis :
le package ‘deal’ a été compilé avec la version R 2.15.2 
> #make copy of train
> ksl<-train
> #discrete cannot inherit from continuous so binary good/bad must be converted to numeric for deal package
> ksl$goodbad<-as.numeric(train$goodbad)
> #no missing values allowed so set any missing to 0
>  ksl$history[is.na(ksl$history1)] <- 0
Message d'avis :
In is.na(ksl$history1) :
  is.na() appliqué à un objet de type 'NULL' qui n'est ni une liste, ni un vecteur
>  #drops empty factors
>  ksl$property<-ksl$property[drop=TRUE]
> ksl.nw<-network(ksl)
> ksl.prior <- jointprior(ksl.nw) 
Imaginary sample size: 129600 
> ksl.nw <- learn(ksl.nw,ksl,ksl.prior)$nw
> result <- heuristic(ksl.nw,ksl,ksl.prior,restart=1,degree=1,trace=TRUE)
[Heuristic [Autosearch Erreur dans phi[[y]] : tentative de sélectionner moins d'un élément
> thebest <- result$nw[[1]]
Erreur : objet 'result' introuvable
> savenet(thebest, "ksl.net")
Erreur dans UseMethod("open") : 
  pas de méthode pour 'open' applicable pour un objet de classe "character"

J'espère que vous pouvez m'aider.
Merci d'avance.

[arm3366]

Bonjour,
Pour la première erreur (lignes 15 et 16) il y a, a priori, un petit souci.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
#no missing values allowed so set any missing to 0
 ksl$history[is.na(ksl$history1)] <- 0

Ton élément [codeinline]ksl$history1[c/odeinline] ne contient RIEN (NULL), ce que vous avez considéré comme des données manquantes, alors que c'est différent.
Il faudra revoir tes données et la façon dont tu traites les NA. Voir aussi les fonctions na.action(), ça pourrait peut-être t'aider.