Comment attraper un entier (0) dans R (avec exemples)

Parfois, lorsque vous utilisez la fonction which() dans R, vous pouvez vous retrouver avec un entier(0) , ce qui indique qu’aucun des éléments d’un vecteur n’est évalué comme VRAI.

Par exemple, supposons que nous utilisions le code suivant pour vérifier quels éléments d’un vecteur sont égaux à la valeur 10 :

#define vector of values
data <- c(1, 2, 4, 4, 5, 7, 8, 9)

#find elements in vector equal to 10
x <- which(data == 10)

#view results
x

integer(0)

Puisqu’aucun des éléments du vecteur n’est égal à 10, le résultat est un entier de longueur 0, écrit sous la forme entier(0) dans R.

Il est important de noter qu’un entier (0) n’est pas une erreur, mais parfois vous souhaiterez peut-être simplement savoir quand cela se produit.

Les exemples suivants montrent comment capturer un entier (0) dans R.

Exemple 1 : attraper un entier (0) dans R en utilisant la fonction identique ()

Le moyen le plus simple d’attraper un entier (0) dans R est d’utiliser la fonction identique() de la manière suivante :

#define vector of values
data <- c(1, 2, 4, 4, 5, 7, 8, 9)

#find elements in vector equal to 10
x <- which(data == 10)

#test if x is identical to integer(0)
identical(x, integer(0))

[1] TRUE

Puisque notre résultat est égal à integer(0) , R renvoie TRUE .

Cela nous permet de savoir que le résultat de la fonction which() est un entier de longueur 0.

Exemple 2 : attraper un entier (0) dans R en utilisant la fonction if else

Une autre façon d’attraper un entier (0) consiste à définir une fonction if else qui renvoie quelque chose de spécifique si un entier (0) se produit.

Par exemple, nous pourrions définir la fonction suivante pour renvoyer la phrase « C’est un entier (0) » si un entier (0) apparaît :

#define function to catch integer(0)
integer0_test <- function(data) {
 
  if(identical(data, integer(0))) {
    return('It is an integer(0)')
  }

  else {
    return(data)
  }

}

On peut alors utiliser cette fonction :

#define vector of values
data <- c(1, 2, 4, 4, 5, 7, 8, 9)

#find elements in vector equal to 10
x <- which(data == 10)

#use function to test if x is integer(0)
integer0_test(x)

[1] "It is an integer(0)"

Puisque x est bien un entier(0) , notre fonction renvoie la phrase que nous avons spécifiée.

Et si x n’est pas un entier(0) , notre fonction renverra simplement le résultat de la fonction which() :

#define vector of values
data <- c(1, 2, 4, 4, 5, 7, 8, 9)

#find elements in vector equal to 4
x <- which(data == 4)

#use function to test if x is integer(0)
integer0_test(x)

[1] 3 4

Notre fonction renvoie 3 et 4 car ce sont les positions des éléments du vecteur qui sont égales à la valeur 4.

Ressources additionnelles

Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans R :

Comment écrire votre première fonction tryCatch() dans R
Comment créer une boucle For imbriquée dans R
Comment renvoyer la valeur d’une fonction dans R