compter le nombre de TRUE en présence de NA

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:

---

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:

---

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

je pense que cet exemple pourrais t'aider

Code:

---

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)

---

Bonjour,

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

Code:

---

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:

---

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.

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