Fonction ls(), rm() à l'intérieur d'une fonction
bonsoir,
Pour éviter toute confusion, je souhaiterais détruire une dataframe présente éventuellement dans l'environnement global lorsque l'utilisateur introduit des arguments non prévus dans la fonction.
Le code suivant ne fonctionne pas :
Code:
1
2
3
4
5
6
7
8
|
calcul <- function(Annee) {
# !!!! le 2ème test ne fonctionne pas ! (histoire d'environnement, sans doute !)
if (!Annee %in% c("2018","2019","2020")) {
if ("Resultat" %in% data.frame(ls())$ls..) rm(Resultat) # pour éviter toute éventuelle confusion avec une "fausse" table
return (0)
} |
Comment faire ?
Merci !
