library(here)
## here() starts at /Users/gustavosplmoura/Library/Mobile Documents/com~apple~CloudDocs/Medicina/Biblioteca/Research/Data Science/DVEP
library(readr)
library(knitr)
library(kableExtra)
bia_males <- read_csv(here("Output", "Baseline", "Tables", "bia_males.csv"))
## Rows: 26 Columns: 4
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (3): Parâmetro, Grupo placebo [média (IC 95%)], Grupo Eclipta [média (IC...
## dbl (1): Valor p [Teste t]
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
kable(bia_males, 
      format = "html",
      row.names = TRUE,
      col.names = c("Parâmetro",
                    "Grupo placebo<br/>[média (IC 95%)]", 
                    "Grupo Eclipta<br/>[média (IC 95%)]", 
                    "Valor p<br/>[Teste t]"),
      escape = FALSE,
      align = "lccc"
) %>%
  kable_styling(full_width = FALSE) %>%
  column_spec(1, width = "1cm") %>%  
  column_spec(2, width = "8cm") %>%  
  column_spec(3, width = "6cm") %>%  
  column_spec(4, width = "6cm")
Parâmetro Grupo placebo
[média (IC 95%)] 		Grupo Eclipta
[média (IC 95%)] 		Valor p
[Teste t]
1 Altura (m) 1.8 (1.7–1.8) 1.8 (1.8–1.8) 0.267
2 Peso (kg) 99 (92.6–105.3) 109.1 (105.6–112.6) 0.026
3 Índice de Massa Corporal (kg/m²) 31.8 (30.7–33) 34.1 (33.1–35.1) 0.026
4 Circunferência Abdominal (m) 1.1 (1–1.1) 1.1 (1–1.2) 0.726
5 Nível de Atividade Física (PAL) 1.4 (1.2–1.5) 1.4 (1.2–1.6) 0.843
6 Ângulo de Fase (°) 7.2 (6.9–7.4) 6.8 (6.6–6.9) 0.035
7 Resistência (Ω) 461.3 (415.5–507.1) 410.6 (376.6–444.7) 0.122
8 Reatância (Ω) 57.8 (53–62.6) 48.8 (44.7–52.8) 0.026
9 Massa gorda Absoluta (kg) 34.2 (30.1–38.3) 34.5 (28.7–40.4) 0.934
10 Índice de Massa gorda (kg/m²) 11 (9.7–12.3) 10.8 (9.1–12.5) 0.846
11 Massa gorda Relativa (%) 34.6 (30.9–38.3) 31.6 (27.1–36.1) 0.362
12 Tecido Adiposo Visceral (kg) 4.6 (3.8–5.5) 4.2 (2.7–5.8) 0.710
13 Massa Livre de Gordura Absoluta (kg) 64.7 (59.2–70.3) 74.5 (70.8–78.2) 0.020
14 Índice de Massa Livre de Gordura (kg/m²) 20.8 (19.5–22.1) 23.3 (21.9–24.7) 0.045
15 Massa Livre de Gordura Relativa (%) 65.4 (61.7–69.1) 68.4 (63.9–72.9) 0.362
16 MME Corporal Total (kg) 32.9 (30.3–35.6) 37.1 (35.5–38.6) 0.029
17 MME do Tronco (kg) 15.1 (13.5–16.7) 16.7 (16–17.3) 0.118
18 MME do Braço Direito (kg) 2 (1.8–2.3) 2.3 (2.2–2.4) 0.076
19 MME do Braço Esquerdo (kg) 2 (1.8–2.2) 2.3 (2.2–2.4) 0.032
20 MME da Perna Direita (kg) 6.8 (6.5–7.2) 7.8 (7.2–8.5) 0.073
21 MME da Perna Esquerda (kg) 7 (6.6–7.4) 7.9 (7.4–8.4) 0.036
22 Água Corporal Total (L) 47.6 (43.5–51.7) 54.8 (51.9–57.7) 0.024
23 Água Extracelular (L) 19.6 (17.9–21.3) 23.1 (21.7–24.4) 0.016
24 Gasto Energético Total (kcal) 11.7 (10.3–13.1) 12.5 (10.3–14.6) 0.583
25 Gasto Energético em Repouso (kcal) 8.5 (8.2–8.8) 8.9 (8.7–9.1) 0.048
26 Energia Armazenada (kcal) 1656.1 (1496.2–1816) 1714.7 (1498.3–1931.1) 0.690