dateInput prevent scrolling with flexdashboard

I have a big problem with the shiny function dateInput. For some reason this function prevent the scrollbar to appear when necessary in a web app. I have here an example.

---
title: "Column Orientation"
output: flexdashboard::flex_dashboard
runtime: shiny
---
    
Column
-------------------------------------
    
### Chart 1
    
```{r}
```
   
Column
-------------------------------------
   
### Chart 2

```{r}
actionButton("8", "1")

br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()
br()

#dateInput("10", "data")

actionButton("asdfas", "1")

```   
 
### Chart 3
    
```{r}
```

In this exemple app, the dateInput line is commented, and when running, there is a usefull scrollbar on chart 2 (add more br() if you have a big screen). If you uncomment the dateInput line and run again, there will be no scrollbar, making impossible to access the second actionButton. There is something that can be done to solve this?

Sorry I can't find a way to print the code as is, it is messing with the rstudio community formatting.

Thank you in advance

Have you read this?

I read it enough time ago, didn't remeber the particular formatting for rmarkdown source code. Thank you for adjusting the post.