意外とわからなかったのでメモ 結論としては、match.call& do.callのコンボを使う。 rnorm_wrap <- function(...){ arg_list <- as.list( match.call( expand.dots=T)) arg_list[[1]] <- NULL do.call(rnorm, args = arg_list) } rnorm_wrap( n = 5 , mean= …