r - 内部関数で引数を再利用するには?

Question

do_something4 つの引数を受け取り、内部関数を呼び出す関数がありますget_options。

do_something <- function(name, amount, manufacturer="abc", width=4){ 
    opts <- get_options(amount, manufacturer = manufacturer, width = width)
}

get_options <- function(amount, manufacturer="abc", width = 4) { 
    opts <- validate_options(manufacturer, width)
}

場合によってはget_options(400)、引数をオーバーライドしたい場合もあれば、get_options(400, manufacturer = "def")を呼び出すdo_something("A", 400)場合もありdo_something("A", 400, width=10)ます。

両方の関数で引数に同じデフォルト値を指定することで冗長になっているようです。これらのデフォルトを共有させるより良い方法はありますか?