ll-left[

See Figure `\@ref(fig:pressure-plot)`.

````
```{r pressure-plot}
par(mar = c(4, 4, .1, .1))
plot(pressure, type = 'b', pch = 19)
```
````

]

.pull-right[

See Figure [1](https://skeleton-bookdown.netlify.com/intro.html).

.center[

&lt;img src="bookdown_files/figure-html/unnamed-chunk-25-1.png" width="75%" /&gt;

]

]


---
name: table-caption

## .center[.fancy[Caption a table]]


.pull-left[

````
```{r iris-tab}
knitr::kable(
  head(iris[,1:4], 3), caption = 'Look!',
  booktabs = TRUE
)
```
`