这可能是一个愚蠢的问题，我正在努力提高我的功能写作技巧。假设我有以下功能：
my_fx<- function(my_argument1, my_argument2=c('option1', 'option2')) {
input_arg<- match.arg(my_argument2)
if(input_arg=='option1') {
#feed my_argument1 to internal_function_1
} else #feed my_argument1 to internal_function_2}
我正在使用match.arg来获取明确的错误消息，以防输入与允许的参数不匹配，我不知道是否有更直接的方法来调用正确的子函数而不是if / else语句。期待收到您的反馈：）