上級

match.arg に候補外の値を渡すと 'arg' should be one of エラーになる

match.arg()で選択肢を制限した引数に、定義された候補のどれとも一致しない値を渡すと、'arg' should be one ofというエラーになります。

このエラーが出る典型パターン

 1  process <- function(mode = c("fast", "slow", "auto")) {
 2    mode <- match.arg(mode)
 3    cat("mode:", mode, "\n")
 4  }
 5  process("turbo")
               ^

 1  render <- function(format = c("png", "jpg", "svg")) {
 2    format <- match.arg(format)
 3    cat("format:", format, "\n")
 4  }
 5  render("gif")
             ^

 1  set_level <- function(level = c("low", "mid", "high")) {
 2    level <- match.arg(level)
 3    cat("level:", level, "\n")
 4  }
 5  set_level("extreme")
                  ^

 1  choose_plan <- function(plan = c("free", "basic", "pro")) {
 2    plan <- match.arg(plan)
 3    cat("plan:", plan, "\n")
 4  }
 5  choose_plan("premium")
                    ^

 1  select_color <- function(color = c("red", "blue", "green")) {
 2    color <- match.arg(color)
 3    cat("color:", color, "\n")
 4  }
 5  select_color("purple")
                     ^

よくある誤解

「文字列を渡す引数なら、どんな値を渡しても受け取ってくれるはず」という思い込みは誤りです。match.arg()は関数定義のデフォルト値に書かれた候補の中からしか値を受け付けず、候補外の値は実行時エラーとして拒否されます。

実務での勘所

match.arg()には、このエラーを出す役割以外にもう1つの働きがあります。引数を完全に省略して呼び出すと、候補として並べた選択肢のうち最初のものを既定値として自動的に選んでくれます。type = c("linear", "quadratic", "cubic")と定義した関数をtypeを指定せずに呼べば、match.arg()は自動的に"linear"を選びます。「候補外の値を拒否する検証」と「省略時に最初の候補を既定値にする」という2つの役割を1行で済ませられることが、広く推奨されている理由です。

演習をはじめる

関連するエラー

• do.call に渡すリストの名前が引数名と一致しないと unused argument になるdo.call(f, args)は、argsという名前付きリストの各要素名をfの引数名として渡します。
• vapply は FUN.VALUE のひな形と実際の戻り値の型・長さが違うとエラーになるvapplyはFUN.VALUEに渡したひな形と、実際に関数が返す値の型や長さが厳密に一致しないとエラーになります。