R readr: вставка аргументов для cols() из списка?

Question

Как мне кормить... аргумент cols() когда мой вклад приходит из списка?

Контекст: я хочу указать типы столбцов данных для чтения readr::readr, указав cols аргументы. Это будет идти как cols(Sepal.Length=col_number(), Sepal.Width=col_number()), Однако эти типы столбцов извлекаются из списка, и я не вижу, как я могу ввести этот список в cols() функционировать?

## standard case:
library(readr)
cols(Sepal.Length="n", Sepal.Width="n")
cols(Sepal.Length=col_number(), Sepal.Width=col_number())

## now input is defined in a list instead:
li_cols <- list(Sepal.Length="n",
            Sepal.Width="n")

## how do I pass this to cols? This won't work:
cols(unlist(li_cols))
cols(li_cols)