在match.arg {base}的例子中，
require(stats)## Extends the example for 'switch'center <- function(x, type = c("mean", "median", "trimmed")) {  type <- match.arg(type)  switch(type,         mean = mean(x),         median = median(x),         trimmed = mean(x, trim = .1))}x <- rcauchy(10)center(x, "t")       # Workscenter(x, "med")     # Works这个后面的center(x, "t")是如何调用的？t是什么？