## Convergence

We plot the $\hat{R}$ statistics calculated by `Stan`.
```{r plotConvergence}
plot(dl, type="Rhat")

```

### Pseudotime convergence

How many of the pseudotime $\hat{R}$ were below a particular level?

```{r tauConvergence}
ggplot(dl$rhat.df %>% filter(parameter == "tau"), aes(rhat)) + stat_ecdf()
```
