R fonction avec args variables en fonction de la présence/absence d'autres arguments

Question

J'ai rencontré le problème varargs en R deux ou trois fois, mais il semble que le problème que j'ai est un peu plus compliqué que prévu. Voici

J'ai une fonction, qui fait quelque chose avec ses variables, mais je voudrais introduire une autre variable, sorte de drapeau, qui sélectionne le fonctionnement de la fonction et les paramètres requis par la fonction elle-même : à savoir le nombre et le type d'entrées dépend d'une entrée (drapeau).

Ok, un exemple est mieux:

example = function(x,flag=1,y){ 
    if (flag) return(x) 
    else return(y) 
} 

et cela fonctionne très bien. Le point est que dans cet exemple, vous devez spécifier à la fois x et y à chaque fois. Au lieu de cela je voudrais une fonction prenant seulement x si flag = 1 et seulement y si flag = 0. (Dans cet exemple stupide, ils seraient essentiellement deux fonctions distinctes, mais dans mon cas, j'ai d'autres arguments (communs) sur certains calculs que les deux parties des fonctions ont besoin). Je sais que l'on peut spécifier n'importe quelle valeur pour l'argument inutilisé et le résultat ne changera pas, mais je veux une fonction qui soit immédiatement lisible par l'utilisateur, et il est fastidieux de devoir spécifier un argument qui a gagné ' t être utilisé par la fonction

merci pour toute aide

Answer 1

Qu'en est-ce qui suit.

example = function(x,flag=1,y){ 
    if (flag && !missing(x)) return(x) 
    else if(!flag && !missing(y)) return(y) 
} 

Ceci va vérifier si le drapeau est 0 ou non nul plus il vérifiera si un argument est manquant. Vous voudrez peut-être gérer le cas où aucun de ces deux n'est vrai parce que cette fonction retournera NULL dans ce cas.