How to plot 2 ggplots side by side?

[WillemSleegers]

Hi everyone,

Does anyone know how to present two ggplots side by side using the 2 column layout and also have only 1 single code chunk displayed before it?

If I simply plot two ggplots, I can get them side by side, but I then see 2 code chunks right above the plots, one for each plot.

[BradyAJohnston]

Testing it out, I get a single code chunk above the two plots that are side by side:

# Testing References

```{r}
#| label: fig-TESTING
#| fig-cap: "A test plot."
#| layout: "[1, 1]"
library(ggplot2)
plt <- ggplot(mtcars, aes(mpg, wt, colour = factor(cyl))) + 
  geom_point(size = 3) + 
  theme_classic()

plt
plt2 <- ggplot(airquality, aes(Wind, Temp)) + 
  geom_point() + 
  theme_classic()

plt2
```

The code above results in this when rendered:

[jjallaire]

Note that layout here can be simplified to layout-nol=2

[WillemSleegers]

The code works, thanks!

Just to clarify, you need a label and the label should start with fig?

[BradyAJohnston]

If the output is a figure, yes! If the output is a table it should start with tbl. This tripped me up when I was first trying to figure things out.

[WillemSleegers]

That's good to know!

[jjallaire]

Saw this discussion and I think its unfortunate that you need to add crossrefs in order to get this to work. Just made a change to our layout logic that will automatically fuse the code blocks that feed the layout: 274b86c

So this code will work as of v0.9.251 (building now)

```{r}
#| layout: "[1, 1]"
library(ggplot2)
plt <- ggplot(mtcars, aes(mpg, wt, colour = factor(cyl))) + 
  geom_point(size = 3) + 
  theme_classic()

plt
plt2 <- ggplot(airquality, aes(Wind, Temp)) + 
  geom_point() + 
  theme_classic()

plt2
```

[BradyAJohnston]

Excellent! Thanks for continuous and quick improvements!