title: R: flexdashboard shrinks content, any way to prevent this?
body: <p>I ran R markdown with 8 stocks and with 12 stocks.  As you can see the stock charts get increasingly smaller.  Is there any way to force flexdashboard to keep a larger width? I don't mind vertically scrolling when there are 12 or more stocks on a screen.</p>
  
  <pre><code>rmarkdown::render('foo.Rmd')
  # creates foo.html
  </code></pre>
  
  <p><a href="https://i.stack.imgur.com/l4Cez.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/l4Cez.png" alt="enter image description here"></a></p>
  
  <p><strong>foo.Rmd</strong></p>
  
  <pre><code>---
  title: "Semiconductor: 5 years"
  output:
    flexdashboard::flex_dashboard:
      orientation: rows
  ---
  
  ```{r setup, include=FALSE}
  library(quantmod)
  options("getSymbols.warning4.0"=FALSE)
  options("getSymbols.yahoo.warning"=FALSE)
  getSymbols(c("APH","IBM","CCL","TSS","HSY","COH","QRVO","CMA","RJF","ABBV","SCHW","RTN"), src="yahoo", from="2012-01-01")
  ```
  
  Row
  -------------------------------------
  ### APH
  ```{r, fig.height=5}
  chartSeries(APH, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### IBM
  ```{r, fig.height=5}
  chartSeries(IBM, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### CCL
  ```{r, fig.height=5}
  chartSeries(CCL, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### TSS
  ```{r, fig.height=5}
  chartSeries(TSS, type="line", subset="last 5 years", TA=NULL)
  ```
  
  
  
  Row
  -------------------------------------
  ### HSY
  ```{r, fig.height=5}
  chartSeries(HSY, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### COH
  ```{r, fig.height=5}
  chartSeries(COH, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### QRVO
  ```{r, fig.height=5}
  chartSeries(QRVO, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### CMA
  ```{r, fig.height=5}
  chartSeries(CMA, type="line", subset="last 5 years", TA=NULL)
  ```
  
  
  
  Row
  -------------------------------------
  ### RJF
  ```{r, fig.height=5}
  chartSeries(RJF, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### ABBV
  ```{r, fig.height=5}
  chartSeries(ABBV, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### SCHW
  ```{r, fig.height=5}
  chartSeries(SCHW, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### RTN
  ```{r, fig.height=5}
  chartSeries(RTN, type="line", subset="last 5 years", TA=NULL)
  ```
  </code></pre>
  
  <p><strong>foo.Rmd (with vertical scroll)</strong></p>
  
  <pre><code>---
  title: "Semiconductor: 5 years"
  output:
    flexdashboard::flex_dashboard:
      vertical_layout: scroll
      orientation: rows
  ---
  
  ```{r setup, include=FALSE}
  library(quantmod)
  options("getSymbols.warning4.0"=FALSE)
  options("getSymbols.yahoo.warning"=FALSE)
  getSymbols(c("MTB","IVZ","UAL","MOS","MCK","ADSK","LEG","STT","RMD","EBAY","RF","FIS"), src="yahoo", from="2012-01-01")
  ```
  
  Row
  -------------------------------------
  ### MTB
  ```{r}
  chartSeries(MTB, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### IVZ
  ```{r}
  chartSeries(IVZ, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### UAL
  ```{r}
  chartSeries(UAL, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### MOS
  ```{r}
  chartSeries(MOS, type="line", subset="last 5 years", TA=NULL)
  ```
  
  
  
  Row
  -------------------------------------
  ### MCK
  ```{r}
  chartSeries(MCK, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### ADSK
  ```{r}
  chartSeries(ADSK, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### LEG
  ```{r}
  chartSeries(LEG, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### STT
  ```{r}
  chartSeries(STT, type="line", subset="last 5 years", TA=NULL)
  ```
  
  
  
  Row
  -------------------------------------
  ### RMD
  ```{r}
  chartSeries(RMD, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### EBAY
  ```{r}
  chartSeries(EBAY, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### RF
  ```{r}
  chartSeries(RF, type="line", subset="last 5 years", TA=NULL)
  ```
  
  ### FIS
  ```{r}
  chartSeries(FIS, type="line", subset="last 5 years", TA=NULL)
  ```
  </code></pre>