[R-br] knitr::kable() para pdf como aumentar o tamanho da fonte do caption?

[Cesar Rabak]

*Qual* dos modelos você usou?

Veja o modelo do artigo (eventualmente no *site* dele) e observe onde o
*caption* é estabelecido.

SE vc vai fazer um número pequeno de vezes isso, então outra alternativa
seria pegar o .TeX intermediário e compilar com outra classe de documento.

HTH

On Fri, Feb 7, 2020 at 6:14 PM Paulo Eduardo de Mesquita por (R-br) <
r-br em listas.c3sl.ufpr.br> wrote:

> Olá pessoal,
>
> Paz e bem,
>
> O arquivo Rmd que segue anexo (e abaixo); produz um documento no formato
> pdf que contém a tabela exemplo ilustrada abaixo.
>
> Eu utilizei um template do pacote "rticles" que possui uma formatação
> esteticamente agradável.
>
> [image: T1.png]
> Contudo, o tamanho da fonte do caption da tabela é menor do que o tamanho
> da fonte no corpo da tabela o que, a meu ver, quebra a harmonia do
> documento e gera um desconforto cognitivo apreciável.
>
> Eu não sei onde é definido o tamanho da fonte do caption, talvez no
> template que eu utilizei (arquivo csl também segue anexo).  Apesar de ter
> pesquisado bastante, não consegui encontrar solução que me permitisse
> realizar dois ajustes: (1) Trocar o "Table 1" por "Tabela 1" e aumentar o
> tamanho da fonte do caption.
>
> Agradeço as orientações que vocês possam me passar.
>
> Muito obrigado.
>
> --
>
> Paulo Eduardo de Mesquita
>
> Disciplina de Infectologia - Faculdade de Medicina  Universidade do Oeste
> Paulista Presidente Prudente - São Paulo - Brasil
>
> telefone: 5518 97718261
>
>
> ---
> title: Planetary Statistics
> author:
>   - name: Alice Anonymous
>     email: alice em example.com
>     affiliation: Some Institute of Technology
>     footnote: 1
>   - name: Bob Security
>     email: bob em example.com
>     affiliation: Another University
> address:
>   - code: Some Institute of Technology
>     address: Department, Street, City, State, Zip
>   - code: Another University
>     address: Department, Street, City, State, Zip
> footnote:
>   - code: 1
>     text: "Corresponding Author"
>   - code: 2
>     text: "Equal contribution"
> journal: "An awesome journal"
> date: "`r Sys.Date()`"
> csl: elsevier-harvard.csl
> output: rticles::elsevier_article
> geometry: "left=3cm,right=2cm,top=2cm,bottom=2cm"
> ---
>
> ```{r 1, include = TRUE, message=FALSE, warning=FALSE}
> require(dplyr)
> require(knitr)
> require(kableExtra)
> require(rticles)
>
> Mercury <- c(57900000, 4878, 1416, 88, 0.38, 100, 0)
> Venus <- c(108160000, 12104, 5832, 224, 0.9, 480, 0)
> Earth <- c(149600000, 12756, 24, 365, 1, 14, 1)
> Mars <- c(227936640, 6794, 24, 687, 0.38, -63, 2)
> Jupiter <- c(778369000, 142984, 10, 4380, 2.64, -130, 79)
> Saturn <- c(1427034000, 120536, 11, 10585, 1.16, -130, 62)
> Uranus <- c(2870658186, 51118, 17, 30660, 1.11, -200, 27)
> Neptune <- c(4496976000, 49532, 16, 60225, 1.21, -200, 14)
>
> df <- rbind(Mercury, Venus, Earth, Mars, Jupiter, Saturn, Uranus, Neptune)
>
> colnames(df) <- c("DFS",
> "Diameter","Day","Year","Gravity","Temperature","Moons")
>
> kable(df, caption = "Planetary Statistics.",
>             booktabs = T, linesep = "", align = "lcccccc", format =
> "latex") %>%
> kable_styling(bootstrap_options = "condensed", latex_options = "striped",
>               stripe_color = "#D9D8D8") %>%
> kable_styling(font_size = 10) %>%
> kable_styling(latex_options = "HOLD_position") %>%
> footnote(alphabet = "https://www.bobthealien.co.uk/solarsystem/table.htm",
>
>          alphabet_title = "Source:", footnote_as_chunk = T) %>%
> footnote(alphabet = "average temperature in oC",
>          alphabet_title = "Temperature:", footnote_as_chunk = T) %>%
> footnote(alphabet = "ratio to Earth's gravity",
>          alphabet_title = "Gravity:", footnote_as_chunk = T) %>%
> footnote(alphabet = "time to complete a full rotation around the sun in
> days",
>          alphabet_title = "Year:", footnote_as_chunk = T) %>%
> footnote(alphabet = "time to complete a full rotation over its axis in
> hours",
>          alphabet_title = "Day:", footnote_as_chunk = T) %>%
> footnote(alphabet = "in km",
>          alphabet_title = "Diameter:", footnote_as_chunk = T) %>%
> footnote(alphabet = "distance from the sun in km",
>          alphabet_title = "DFS:",  footnote_as_chunk = T)
> ```
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
> código mínimo reproduzível.
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20200208/5400f9f3/attachment.html>
-------------- Próxima Parte ----------
Um anexo não-texto foi limpo...
Nome: T1.png
Tipo: image/png
Tamanho: 49206 bytes
Descrição: não disponível
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20200208/5400f9f3/attachment.png>