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 sortir plus tôt de la fonction avec return().
Pour vérifier si x est divisible par n, vous pouvez utiliser is_divisible_by(x, n) de assertive.
Autrement, utilisez l'opérateur modulo, %%. x %% n donne le reste de la division de x par n, donc x %% n == 0 indique si x est divisible par n. Essayez 1:10 %% 3 == 0 dans la console.
Pour résoudre cet exercice, vous devez savoir qu'une année bissextile survient chaque 400e année (comme l'an 2000) ou chaque 4e année qui n'est pas centenaire (comme 1904, mais pas 1900 ni 1905).
assertive est déjà chargé.
Cette activité fait partie du cours
Introduction à l'écriture de fonctions en R
Instructions de l’exercice
- Complétez la définition de
is_leap_year(), en vérifiant successivement siyearest divisible par 400, puis par 100, puis par 4, et en quittant la fonction plus tôt à chaque cas au moyen dereturn().
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
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
___
}