---
title: "Fitted distributions"
output:
  html_document: default
  pdf_document: default
  word_document: default
date: "`r format(Sys.time(), '%d %B %Y, %H:%M')`"
fontsize: 11pt
params:
  fit: NA
  bin.left: NA
  bin.right: NA
  chips: NA
  roulette: NA
---


```{r global_options, include=FALSE}
knitr::opts_chunk$set(echo=FALSE, warning=FALSE, message=FALSE,
                      fig.pos = 'h',
                      fig.align = 'center',
                      fig.height = 3,
                      fig.width = 4)
showplots <- FALSE
```




```{r, echo = FALSE}
fit <- params$fit
bin.left <- params$bin.left
bin.right <- params$bin.right
chips <- params$chips
roulette <- params$roulette
filename <- system.file("shinyAppFiles", "distributionsChild.Rmd", package="SHELF")
```

```{r child=filename}
```

