Discussion :

[jane40]

Bonjour,

Mon problème est assez simple. Je souhaite compter le nombre de "TRUE" contenus dans une liste diagForT, dans une des colonnes.
Les valeurs possibles sont "FALSE", "TRUE" et "NA". Je n'arrive pas à gérer les NA.
Voici le code que j'ai essayé :

Code :

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

1
2
3
4
5
6
7
8
 
temp=0
pchisq = function(k,temp,diagForT)
{ 
if ((diagForT$pchisq[k]!=NA) && diagForT$pchisq[k]>0.97)
	{temp=temp+1}
return(temp)
}

Mais à l'endroit où il y a un NA, ça plante :

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
 
typeof(diagForT)
[1] "list"
> typeof(diagForT$pchisq)
[1] "double"
> temp
[1] 0
 
diagForT$pchisq[11845]
[1] NA
 
diagForT$pchisq[11845]!="NA"
[1] NA
> diagForT$pchisq[11845]=="NA"
[1] NA
 if ((diagForT$pchisq[11845]!=NA) && diagForT$pchisq[11845]>0.97)
+ {temp=temp+1}
Erreur dans if ((diagForT$pchisq[11845] != NA) && diagForT$pchisq[11845] >  : 
  valeur manquante là où TRUE / FALSE est requis

Comment puis-je régler ce problème? Comment regarder si diagForT$pchisq[k]!=NA ?

Merci d'avance

[dickoa]

je pense que cet exemple pourrais t'aider

Code :

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

1
2
3
4
5
6
 
set.seed(1)
exemple <- sample(c(TRUE, FALSE, NA), size = 30, replace = TRUE)
exemple
# nombre de TRUE
sum(exemple, na.rm = TRUE)

[A. D.]

Bonjour,

En complément au message de dickoa, je pense que le soucis dans votre programme se situe au niveau de l'instruction :

Code :

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

diagForT$pchisq[k]!=NA

En effet, pour sélectionner les éléments d'un vecteur qui sont différents de NA, il faut mieux procéder ainsi :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
exemple <- sample(c(TRUE, FALSE, NA), size = 30, replace = TRUE)
exemple
 [1] FALSE    NA  TRUE    NA  TRUE    NA    NA FALSE    NA  TRUE    NA    NA
[13]    NA  TRUE FALSE FALSE FALSE    NA    NA FALSE    NA    NA  TRUE    NA
[25]    NA FALSE    NA  TRUE  TRUE    NA
 
u<-which(!is.na(exemple))   # éléments différents de NA
u
[1]  1  3  5  8 10 14 15 16 17 20 23 26 28 29
 
exemple[u]
 [1] FALSE  TRUE  TRUE FALSE  TRUE  TRUE FALSE FALSE FALSE FALSE  TRUE FALSE
[13]  TRUE  TRUE

En espérant que ceci vous donne des pistes.
Bonne continuation


Cordialement,

A.D.

[jane40]

Merci pour vos réponses, ça résout mes problèmes