presentacion - ¿Cómo puedo corregir los saltos de columna en una presentación de Rmarkdown/ioslides?

presentacion en rmarkdown

Question

Usando lo que actualmente es la versión de desarrollo de RStudio (0.98.758), me encanta que pueda crear una presentación de rmarkdown en rmarkdown .

Los documentos de rmarkdown para este formato dan una descripción de cómo hacer una diapositiva de dos columnas, y viene con la advertencia de que:

Tenga en cuenta que el contenido fluirá a través de las columnas, por lo que si desea tener una imagen en un lado y un texto en el otro, debe asegurarse de que la imagen tenga la altura suficiente para forzar el texto al otro lado de la diapositiva.

¡Pero parece que no puedo hacer una imagen lo suficientemente grande! El texto aún se empuja desde la parte inferior de la primera columna. En la presentación a continuación, me gustaría comparar un histograma base con un histograma qplot lado a lado en columnas, con algunos comentarios y código. He incluido código para un ejemplo relativamente corto con algunos intentos básicos de solución. Si lo tejes, creo que el problema será obvio. (Tenga en cuenta que necesitará una versión preliminar de RStudio ).

---
title: "Two Column"
author: "Some guy on Stack Overflow"
date: "Friday, April 04, 2014"
output: ioslides_presentation
---
## Two-Column Attempt {.smaller}
<div class="columns-2">
Base graphics can be quick...
```{r, fig.width = 3, fig.height = 4}
par_opts <- names(par())
hist(nchar(par_opts),
breaks = seq(1.5, 9.5, by = 1))
```
But `ggplot2` can be quick too:
```{r, fig.width = 2.5, fig.height = 2.5}
require(ggplot2, quietly = T)
qplot(factor(nchar(par_opts)))
```
</div>
## Two-Column Attempt: Taller Hist {.smaller}
<div class="columns-2">
Base graphics can be quick...
```{r, fig.width = 3, fig.height = 6}
par_opts <- names(par())
hist(nchar(par_opts),
breaks = seq(1.5, 9.5, by = 1))
```
But `ggplot2` can be quick too:
```{r, fig.width = 2.5, fig.height = 2.5}
require(ggplot2, quietly = T)
qplot(factor(nchar(par_opts)))
```
</div>
## Two-Column Attempt: Extra div {.smaller}
<div class="columns-2">
Base graphics can be quick...
```{r, fig.width = 3, fig.height = 4}
par_opts <- names(par())
hist(nchar(par_opts),
breaks = seq(1.5, 9.5, by = 1))
```
<div>
...
</div>
But `ggplot2` can be quick too:
```{r, fig.width = 2.5, fig.height = 2.5}
require(ggplot2, quietly = T)
qplot(factor(nchar(par_opts)))
```
</div>

Aquí hay una imagen de la cuarta diapositiva, puede ver que el texto se corta en la parte inferior de la columna izquierda, mientras que la columna derecha tiene mucho espacio.

Answer 1

He estado rascando mi cabeza alrededor de esto también.

Puede evitar usar los divs y usar {.columns-2} como un atributo de encabezado.

Para las imágenes, configuro un tamaño relativamente grande por defecto en el yaml usando fig_height y fig_width . Luego, usando el atributo out.width en el fragmento, controlo el tamaño de la salida (350px parece funcionar bien en este diseño)

---
title: "Two Column"
author: "Some guy on Stack Overflow"
date: "Friday, April 04, 2014"
output:
ioslides_presentation:
fig_height: 7
fig_width: 7
---
## Two-Column Attempt {.smaller .columns-2}
Base graphics can be quick...
```{r, out.width = ''350px''}
par_opts <- names(par())
hist(nchar(par_opts),
breaks = seq(1.5, 9.5, by = 1))
```
But `ggplot2` can be quick too:
```{r, out.width = ''350px''}
require(ggplot2, quietly = T)
qplot(factor(nchar(par_opts)))
```