Saltar al contenido

tabla con texto extenso, viñetas y ancho de tabla específico

Estate atento ya que en este post vas a encontrar el arreglo que buscas.Este post ha sido analizado por nuestros expertos para asegurar la calidad y veracidad de nuestro contenido.

Solución:

Una solución alternativa basada en kableExtra (opcional: con notas al pie)

Este enfoque permite agregar un título, agregar manualmente notas al pie dentro de la tabla y corregir el ancho de las columnas.

Para crear la lista de viñetas:

  • “más grueso” cdots de LaTex se emplean como balas (ver alternativas aquí)
  • los saltos de línea se fuerzan con n (La sangría, por lo tanto, no es tan agradable como con el pander enfoque de @daroczig).

MWE

library(stringi); library(kableExtra); library(dplyr)
string_short <- "Descriptor"
string_long <- substr(stri_rand_lipsum(1), 1, 50)

# add footnotes manually within table
string_bulletlist <- "$\boldsymbol\cdot$ bullet point 1: foo$^a$ n $\boldsymbol\cdot$ bullet point 2: bar$^b$"

df <- data.frame(col1 = c(string_short, string_short),
                 col2 = c(string_bulletlist, string_bulletlist),
                 col3 = c(string_long, string_long)
)
col_names <- c("Descriptor", "Description with list", "Some comment")

# header: bold column names
colnames(df) <- paste0("\textbf", col_names,"")

# add footnote with kableExtra commands
names(df)[1] <- paste0(names(df)[1], footnote_marker_symbol(1))

df %>%
  mutate_all(linebreak) %>% # required for linebreaks to work
  kable(
    "latex",  
    escape = F, 
    booktabs=TRUE, 
    align = "l",
    caption = 'kableTable with bullet list and footnote') %>%
  # kable_styling(full_width = F) %>% # makes no difference here
  footnote(general = "General comment of the table.",
           alphabet = c("Footnote A;", "Footnote B;"),
           symbol = c("Footnote Symbol 1")) %>% 
  column_spec(1, width = "5em") %>% # fix width column 1
  column_spec(2, width = "10em") %>% # fix width column 2
  column_spec(3, width = "15em") # fix width column 3

Para[mejorarelespaciadodelínea[(https://stackoverflowcom/questions/53794142/increase-line-row-spacing-with-kableextra)sepuedeagregarelsiguientefragmentodecódigoantesydespuésenelRmd:[improvelinespacing[(https://stackoverflowcom/questions/53794142/increase-line-row-spacing-with-kableextra)onecanaddthefollowingbefore&aftercodechunkintheRmd:

renewcommandarraystretch1.5 
RMD CHUNK HERE
renewcommandarraystretch1 

tabla kableExtra

Comentario:

También probé el pander acercamiento desde @daroczig y realizó las siguientes experiencias:

  • Pro: un buen interlineado más una “lista de viñetas real” (en comparación con el $boldsymbolcdot$-arreglo en el kableExtra Acercarse).
  • Estafa: Se incluye un gran espacio en blanco después de la lista de viñetas.

Además, al utilizar el pander enfoque en un archivo Rmd utilizando la plantilla de tesis de huskydown, las notas al pie alteraron enormemente la alineación de la tabla.

Recuerda que te damos el privilegio añadir una estimación justa si diste con el arreglo.

¡Haz clic para puntuar esta entrada!
(Votos: 0 Promedio: 0)



Utiliza Nuestro Buscador

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *