Knitr Crossrefs

TipLearn more

See the full guide on Cross References.

Figures

::: {.cell}

```{.r .cell-code}
library(ggplot2)
dat <- data.frame(cond = rep(c("A", "B"), each=10),
                  xvar = 1:20 + rnorm(20,sd=3),
                  yvar = 1:20 + rnorm(20,sd=3))

ggplot(dat, aes(x=xvar, y=yvar)) +
    geom_point(shape=1) + 
    geom_smooth() 
```

::: {.cell-output-display}
![Random](crossref-knitr_files/figure-html/fig-random-1.png){#fig-random width=672}
:::
:::

library(ggplot2)
dat <- data.frame(cond = rep(c("A", "B"), each=10),
                  xvar = 1:20 + rnorm(20,sd=3),
                  yvar = 1:20 + rnorm(20,sd=3))

ggplot(dat, aes(x=xvar, y=yvar)) +
    geom_point(shape=1) + 
    geom_smooth() 

Figure 1: Random

See Figure 1.

Sub-Figures

::: {#fig-multiple .cell layout-ncol="2"}

```{.r .cell-code}
plot(pressure)
plot(cars)
```

::: {.cell-output-display}
![Pressure](crossref-knitr_files/figure-html/fig-multiple-1.png){#fig-multiple-1 width=672}
:::

::: {.cell-output-display}
![Cars](crossref-knitr_files/figure-html/fig-multiple-2.png){#fig-multiple-2 width=672}
:::

Multiple
:::

plot(pressure)
plot(cars)

(a) Pressure

(b) Cars

Figure 2: Multiple

See Figure 2 (a) and Figure 2 (b).

Tables

::: {#tbl-mtcars .cell tbl-cap='mtcars'}

```{.r .cell-code}
library(knitr)
kable(head(mtcars))
```

::: {.cell-output-display}


|                  |  mpg| cyl| disp|  hp| drat|    wt|  qsec| vs| am| gear| carb|
|:-----------------|----:|---:|----:|---:|----:|-----:|-----:|--:|--:|----:|----:|
|Mazda RX4         | 21.0|   6|  160| 110| 3.90| 2.620| 16.46|  0|  1|    4|    4|
|Mazda RX4 Wag     | 21.0|   6|  160| 110| 3.90| 2.875| 17.02|  0|  1|    4|    4|
|Datsun 710        | 22.8|   4|  108|  93| 3.85| 2.320| 18.61|  1|  1|    4|    1|
|Hornet 4 Drive    | 21.4|   6|  258| 110| 3.08| 3.215| 19.44|  1|  0|    3|    1|
|Hornet Sportabout | 18.7|   8|  360| 175| 3.15| 3.440| 17.02|  0|  0|    3|    2|
|Valiant           | 18.1|   6|  225| 105| 2.76| 3.460| 20.22|  1|  0|    3|    1|


:::
:::

See @tbl-mtcars.

library(knitr)
kable(head(mtcars))

Table 1: mtcars

	mpg	cyl	disp	hp	drat	wt	qsec	vs	am	gear	carb
Mazda RX4	21.0	6	160	110	3.90	2.620	16.46	0	1	4	4
Mazda RX4 Wag	21.0	6	160	110	3.90	2.875	17.02	0	1	4	4
Datsun 710	22.8	4	108	93	3.85	2.320	18.61	1	1	4	1
Hornet 4 Drive	21.4	6	258	110	3.08	3.215	19.44	1	0	3	1
Hornet Sportabout	18.7	8	360	175	3.15	3.440	17.02	0	0	3	2
Valiant	18.1	6	225	105	2.76	3.460	20.22	1	0	3	1

See Table 1.

Sub-Tables

::: {#tbl-tables .cell layout-ncol="2" tbl-cap='Tables' tbl-subcap='["Cars","Pressure"]'}

```{.r .cell-code}
library(knitr)
kable(head(cars))
```

::: {.cell-output-display}


| speed| dist|
|-----:|----:|
|     4|    2|
|     4|   10|
|     7|    4|
|     7|   22|
|     8|   16|
|     9|   10|


:::

```{.r .cell-code}
kable(head(pressure))
```

::: {.cell-output-display}


| temperature| pressure|
|-----------:|--------:|
|           0|   0.0002|
|          20|   0.0012|
|          40|   0.0060|
|          60|   0.0300|
|          80|   0.0900|
|         100|   0.2700|


:::
:::

See @tbl-tables-2

Table 2: Tables

(a) Cars

speed	dist
4	2
4	10
7	4
7	22
8	16
9	10

(b) Pressure

temperature	pressure
0	0.0002
20	0.0012
40	0.0060
60	0.0300
80	0.0900
100	0.2700

See Table 2 (b).