Передача значения аргумента в консоли вместо объявления его внутри фрагмента кода

Question

У меня много CSV-файлов с одинаковыми шаблонами "число" _2019.csv Я хочу указать номер в консоли для рендеринга уценки вместо того, чтобы иметь в блоке кода.

```{r, echo=FALSE}
number <- "4031" # I need to pass this in console
data <- read.csv(list.files(pattern = paste(number, "_2019*", sep = "")), stringsAsFactors = FALSE)
```

```{r include=FALSE}
print(data)
```