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 elpander
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
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 elkableExtra
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.