5  Presentaciones en RMD

RMD es la extensión de los archivos creados en Rmarkdown es una combinación de códigos de R y Markdown (Revisa acá ¿Qué es markdown?)

5.1 Presentaciones en RMarkdown

Para crear una presentacion en RMarkdown, utilizando RStudio, se debe seleccionar un nuevo archivo tipo RMarkdown, luego el tipo de presentación que se quiere desarrollar, para este ejemplo seleccionamos beamer, luego se abrira una ventana con un codigo escrito similar al siguiente:

# ---
# title: "Tu Título"
# author: "Tu Nombre"
# date: "Fecha"
# output: beamer_presentation
# ---
# 
# ## Diapositivas con viñeta
# 
# - Viñeta 1
# - Viñeta 2
# - Viñeta 3

5.2 Funciones con kableExtra

Para crear tablas en formato LaTeX o HTML con el paquete kableExtra, primero definimos los datos y luego aplicamos las funciones del paquete para formatear la tabla.

# Para instalar paquete "kableExtra" en caso de ser necesario

paquetes <- c("kableExtra", "DT", "htmlwidgets")

# Función para instalar y cargar paquetes
install_carga <- function(paquetes) {
  if (!require(paquetes, character.only = TRUE)) {
    install.packages(paquetes)
    library(paquetes, character.only = TRUE)
  }
}

# Aplicar la función a cada paquete de la lista
lapply(paquetes, install_carga)
[[1]]
NULL

[[2]]
NULL

[[3]]
NULL
# Carga libreria
library(kableExtra)

# Definir datos
dt <- mtcars[1:5, 1:6]

# Crear una tabla con estilo en LaTeX
kbl(dt, booktabs = TRUE) %>%
  kable_styling(latex_options = "striped")
mpg cyl disp hp drat wt
Mazda RX4 21.0 6 160 110 3.90 2.620
Mazda RX4 Wag 21.0 6 160 110 3.90 2.875
Datsun 710 22.8 4 108 93 3.85 2.320
Hornet 4 Drive 21.4 6 258 110 3.08 3.215
Hornet Sportabout 18.7 8 360 175 3.15 3.440

Ejemplo de tabla con estilos

# Definir los datos
dt <- mtcars[1:5, 1:6]

# Crear una tabla con múltiples estilos
kbl(dt,
    booktabs = TRUE) %>%
  kable_styling(
    bootstrap_options = c("striped", "hover", "condensed"),
    full_width = FALSE,
    position = "center",
    font_size = 10
  ) %>%
  add_header_above(c(" ", "Grupo 1" = 3, "Grupo 2" = 3)) %>%
  column_spec(1, bold = TRUE, color = "red",
              background = "yellow") %>%
  column_spec(2, width = "5em") %>%
  row_spec(0, bold = TRUE, color = "white",
           background = "#D7261E") %>%
  row_spec(1:5, background = "#F7F7F7")
Grupo 1
Grupo 2
mpg cyl disp hp drat wt
Mazda RX4 21.0 6 160 110 3.90 2.620
Mazda RX4 Wag 21.0 6 160 110 3.90 2.875
Datsun 710 22.8 4 108 93 3.85 2.320
Hornet 4 Drive 21.4 6 258 110 3.08 3.215
Hornet Sportabout 18.7 8 360 175 3.15 3.440



Explicación de los Estilos

  • booktabs: Utiliza el paquete booktabs para mejorar el diseño de la tabla.

  • bootstrap_options: Añade varias opciones de estilo como striped (filas alternas de color), hover (resaltar filas al pasar el mouse) y condensed (espaciado reducido).

  • full_width: Ajusta la tabla para que no ocupe todo el ancho disponible.

  • position: Define la posición de la tabla, en este caso centra la tabla en la página.

  • font_size: Cambia el tamaño de la fuente de la tabla.

  • add_header_above: Añade un encabezado adicional encima de la tabla para agrupar columnas.

  • column_spec: Especifica estilos para columnas individuales. En este caso, la primera columna es negrita, roja y con fondo amarillo, y la segunda columna tiene un ancho específico.

  • row_spec: Especifica estilos para filas individuales. La fila de encabezado (0) es negrita, blanca con fondo rojo oscuro, y las filas 1 a 5 tienen un fondo gris claro.