Retour anticipé
Parfois, il n’est pas nécessaire d’exécuter tout le corps d’une fonction pour obtenir la réponse. Dans ce cas, vous pouvez retourner plus tôt depuis cette fonction avec return().
Pour vérifier si x est divisible par n, vous pouvez utiliser is_divisible_by(x, n) du package assertive.
Vous pouvez aussi utiliser l’opérateur modulo, %%. x %% n donne le reste de la division de x par n, donc x %% n == 0 détermine si x est divisible par n. Essayez 1:10 %% 3 == 0 dans la console.
Pour résoudre cet exercice, sachez qu’une année bissextile est soit chaque 400e année (comme l’année 2000), soit chaque 4e année qui n’est pas centennale (comme 1904, mais pas 1900 ni 1905).
assertive est chargé.
Cet exercice fait partie du cours
Introduction à l’écriture de fonctions en R
Instructions
- Complétez la définition de
is_leap_year(), en testant siyearest divisible par 400, puis par 100, puis par 4, et en retournant tôt depuis la fonction dans chaque cas.
Exercice interactif pratique
Essayez cet exercice en complétant cet exemple de code.
is_leap_year <- function(year) {
# If year is div. by 400 return TRUE
if(___) {
return(___)
}
# If year is div. by 100 return FALSE
if(___) {
___
}
# If year is div. by 4 return TRUE
___
# Otherwise return FALSE
___
}