<div dir="ltr"><div class="gmail_default"><div class="gmail_default"><b><font face="arial, helvetica, sans-serif">Estou testando o pacote "qwraps2", então estou rodando o exemplo em: <a href="https://github.com/r-lib/xml2/issues/151">https://github.com/r-lib/xml2/issues/151</a>, conforme abaixo.</font></b></div><div class="gmail_default"><font face="arial, helvetica, sans-serif"><br></font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">set.seed(42)</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">library(dplyr)</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">## </font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">## Attaching package: 'dplyr'</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">## The following objects are masked from 'package:stats':</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">## </font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">##     filter, lag</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">## The following objects are masked from 'package:base':</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">## </font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">##     intersect, setdiff, setequal, union</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">library(qwraps2)</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif"><br></font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif"># define the markup language we are working in.</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif"># options(qwraps2_markup = "latex") is also supported.</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">options(qwraps2_markup = "markdown")</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif"><br></font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">data(mtcars)</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">mtcars2 <-dplyr::mutate(mtcars, cyl_factor = factor(cyl,levels = c(6, 4, 8), labels = paste(c(6, 4, 8), "cylinders")),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">                        cyl_character = paste(cyl, "cylinders"))</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">our_summary1 <-</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">  list("Miles Per Gallon" =</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">         list("min" = ~ min(mpg),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">              "max" = ~ max(mpg),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">              "mean (sd)" = ~ qwraps2::mean_sd(mpg)),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">       "Displacement" =</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">         list("min" = ~ min(disp),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">              "max" = ~ max(disp),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">              "mean (sd)" = ~ qwraps2::mean_sd(disp)),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">       "Weight (1000 lbs)" =</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">         list("min" = ~ min(wt),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">              "max" = ~ max(wt),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">              "mean (sd)" = ~ qwraps2::mean_sd(wt)),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">       "Forward Gears" =</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">         list("Three" = ~ qwraps2::n_perc0(gear == 3),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">              "Four"  = ~ qwraps2::n_perc0(gear == 4),</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">              "Five"  = ~ qwraps2::n_perc0(gear == 5))</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">  )</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">our_summary1</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif"><br></font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">### Overall</font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif">summary_table(mtcars2, our_summary1)</font></div><div style="font-size:small"><font face="arial, helvetica, sans-serif"><br></font></div></div><div><div class="gmail_default" style="font-size:small"><font face="arial, helvetica, sans-serif"><b>O código foi executado com sucesso no RStudio, porém a tabela aparece como:</b></font></div><div class="gmail_default" style="font-size:small"><div><font face="arial, helvetica, sans-serif"><img src="cid:ii_jkfxms280" alt="Screenshot from 2018-08-04 18-29-38.png" width="352" height="299"><br></font></div></div><div class="gmail_default" style="font-size:small"><font face="arial, helvetica, sans-serif"></font></div><div class="gmail_default" style="font-size:small"><font face="arial, helvetica, sans-serif"><b>Como faço para aparecer a tabela formatada como no exemplo:</b></font></div><div><font face="arial, helvetica, sans-serif"><img src="cid:ii_jkfxoah61" alt="Screenshot from 2018-08-04 18-31-38.png" width="285" height="542"><br></font></div><div class="gmail_default" style="font-size:small"><font face="arial, helvetica, sans-serif"></font></div><font face="arial, helvetica, sans-serif"><br></font></div><font face="arial, helvetica, sans-serif">-- <br></font><div dir="ltr" class="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><div><i><font face="arial, helvetica, sans-serif"><span style="font-size:12.8px">In Jesu et Maria</span><br><br style="font-size:small"></font></i><div><div dir="ltr"><div dir="ltr"><div dir="ltr"><div style="font-size:small"><i><font face="arial, helvetica, sans-serif">Obrigado</font></i></div><div style="font-size:small"><i><font face="arial, helvetica, sans-serif">Prof. Elias Carvalho</font></i></div><div style="font-size:small"><i><font face="arial, helvetica, sans-serif"><br></font></i></div><div><font size="2" face="arial, helvetica, sans-serif"><i style=""><div style="">"Felix, qui potuit rerum cognoscere causas" (Virgil 29 BC)</div><div style="">"Blessed is he who has been able to understand the cause of things"</div></i></font></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div>