У меня есть функция с аргументами по умолчанию и ... например, следующая:
library(shiny)
foo <- function(id = NULL, title = "Title",
icon = icon("caret-right"),
...) {
tags$div(class = "divcl", id = id,
tags$h3(class = "hea", title,
tags$span(class = "spancl", icon)),
...)
}
Все работает нормально, пока я вызываю ее с помощью id
и icon
, например:
foo(id = "id", icon = icon("cars"), tags$div())
Но когда я хочу использовать аргументы по умолчанию icon
и title
, например:
foo(id = "id", tags$div())
, я получаю эту ошибку:
Ошибка в dots_list (...): обещание уже оценивается: рекурсивная ссылка на аргумент по умолчанию или более ранние проблемы?
Что я делаю не так и как мне заставить это работать?