<div dir="ltr"><u>Qual</u> dos modelos você usou?<div><br></div><div>Veja o modelo do artigo (eventualmente no <i>site</i> dele) e observe onde o <i>caption</i> é estabelecido.</div><div><br></div><div>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.</div><div><br></div><div>HTH</div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Fri, Feb 7, 2020 at 6:14 PM Paulo Eduardo de Mesquita por (R-br) <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr">Olá pessoal,<div><br></div><div>Paz e bem,<br><div><br></div><div>O arquivo Rmd que segue anexo (e abaixo); produz um documento no formato pdf que contém a tabela exemplo ilustrada abaixo. </div><div><br></div><div>Eu utilizei um template do pacote "rticles" que possui uma formatação esteticamente agradável.</div><div><br></div><div><div><img src="cid:ii_k6clom144" alt="T1.png" width="562" height="337"></div></div><div>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. </div><div><br></div><div>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. </div><div><br></div><div>Agradeço as orientações que vocês possam me passar. </div><div><br></div><div>Muito obrigado.<br clear="all"><div><br></div><div><div>-- </div></div><div dir="ltr"><div dir="ltr"><div><span><p dir="ltr" style="line-height:1.38;margin-top:0pt;margin-bottom:0pt"><span style="font-size:11pt;font-family:Cambria,serif;vertical-align:baseline;white-space:pre-wrap">Paulo Eduardo de Mesquita</span></p><p dir="ltr" style="line-height:1.38;margin-top:0pt;margin-bottom:0pt"><span style="font-size:11pt;font-family:Cambria,serif;vertical-align:baseline;white-space:pre-wrap">Disciplina de Infectologia - Faculdade de Medicina Universidade do Oeste Paulista Presidente Prudente - São Paulo - Brasil</span></p><p dir="ltr" style="line-height:1.38;margin-top:0pt;margin-bottom:0pt"><span style="font-size:11pt;font-family:Cambria,serif;vertical-align:baseline;white-space:pre-wrap">telefone: 5518 97718261</span></p><div><br></div><div><br></div><div>---<br>title: Planetary Statistics<br>author:<br> - name: Alice Anonymous<br> email: <a href="mailto:alice@example.com" target="_blank">alice@example.com</a><br> affiliation: Some Institute of Technology<br> footnote: 1<br> - name: Bob Security<br> email: <a href="mailto:bob@example.com" target="_blank">bob@example.com</a><br> affiliation: Another University<br>address:<br> - code: Some Institute of Technology<br> address: Department, Street, City, State, Zip<br> - code: Another University<br> address: Department, Street, City, State, Zip<br>footnote:<br> - code: 1<br> text: "Corresponding Author"<br> - code: 2<br> text: "Equal contribution"<br>journal: "An awesome journal"<br>date: "`r Sys.Date()`"<br>csl: elsevier-harvard.csl<br>output: rticles::elsevier_article<br>geometry: "left=3cm,right=2cm,top=2cm,bottom=2cm"<br>---<br><br>```{r 1, include = TRUE, message=FALSE, warning=FALSE}<br>require(dplyr)<br>require(knitr)<br>require(kableExtra)<br>require(rticles)<br><br>Mercury <- c(57900000, 4878, 1416, 88, 0.38, 100, 0)<br>Venus <- c(108160000, 12104, 5832, 224, 0.9, 480, 0)<br>Earth <- c(149600000, 12756, 24, 365, 1, 14, 1)<br>Mars <- c(227936640, 6794, 24, 687, 0.38, -63, 2)<br>Jupiter <- c(778369000, 142984, 10, 4380, 2.64, -130, 79)<br>Saturn <- c(1427034000, 120536, 11, 10585, 1.16, -130, 62)<br>Uranus <- c(2870658186, 51118, 17, 30660, 1.11, -200, 27)<br>Neptune <- c(4496976000, 49532, 16, 60225, 1.21, -200, 14)<br><br>df <- rbind(Mercury, Venus, Earth, Mars, Jupiter, Saturn, Uranus, Neptune)<br><br>colnames(df) <- c("DFS", "Diameter","Day","Year","Gravity","Temperature","Moons")<br><br>kable(df, caption = "Planetary Statistics.", <br> booktabs = T, linesep = "", align = "lcccccc", format = "latex") %>%<br>kable_styling(bootstrap_options = "condensed", latex_options = "striped", <br> stripe_color = "#D9D8D8") %>%<br>kable_styling(font_size = 10) %>%<br>kable_styling(latex_options = "HOLD_position") %>%<br>footnote(alphabet = "<a href="https://www.bobthealien.co.uk/solarsystem/table.htm" target="_blank">https://www.bobthealien.co.uk/solarsystem/table.htm</a>", <br> alphabet_title = "Source:", footnote_as_chunk = T) %>%<br>footnote(alphabet = "average temperature in oC", <br> alphabet_title = "Temperature:", footnote_as_chunk = T) %>%<br>footnote(alphabet = "ratio to Earth's gravity", <br> alphabet_title = "Gravity:", footnote_as_chunk = T) %>%<br>footnote(alphabet = "time to complete a full rotation around the sun in days", <br> alphabet_title = "Year:", footnote_as_chunk = T) %>%<br>footnote(alphabet = "time to complete a full rotation over its axis in hours", <br> alphabet_title = "Day:", footnote_as_chunk = T) %>%<br>footnote(alphabet = "in km", <br> alphabet_title = "Diameter:", footnote_as_chunk = T) %>%<br>footnote(alphabet = "distance from the sun in km", <br> alphabet_title = "DFS:", footnote_as_chunk = T)<br>```<br></div></span></div></div></div></div></div></div>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br>
</blockquote></div>