Rotating images

example.qmd

---
format: html
---

```{r}
library(ggplot2)
library(grid)
```

```{r}
#| warning: false
grid::grid.newpage()
p <- ggplot(mtcars, aes(x = disp,y = mpg)) + geom_point()
print(p, vp=grid::viewport(angle=-90))
```

```{r}
#| echo: fenced
#| out-extra: "style='transform: rotate(90deg); margin-top: 75px;'"
p
```

```{r}
#| echo: fenced
#| out-extra: 'angle=90'
p
```


```{r}
ggsave("norm-plot.png", p)
```

Howdy @Haly-en - as far as I know out.extra and out-extra are arguments passed to CSS/LaTeX layer - while they may work, it might be dependent on LaTeX packaging?

I am not at all a LaTeX expert, and there may be LaTeX native methods, you may want to reference: https://latex.org/forum/viewtopic.php?t=9323

Or could rotate the image after saving it on disk with magick:

ggsave("img.png", gg_obj)

library(magick)
plot_img <- image_read("img.png")

# rotate
image_rotate(plot_img, 90)