baseFinal=base %>% select(ID,GRUPO) %>% inner_join(dfWideDif01) %>% inner_join(dfWideDif02)
## Joining, by = "ID"
## Joining, by = "ID"
baseFinal2=baseFinal %>% select(-ID) %>%
  mutate(GRUPO=factor(as.integer(GRUPO),levels=c(1,2,3),labels=c("Grupo 1","Grupo 2","p-valor")) )

rndr <- function(x, name, ...) {
        if (length(x) == 0) {
          y <- baseFinal2[[name]]
          s <- rep("", length(render.default(x=y, name=name, ...)))
          if (is.numeric(y)) {
            p=1
            try({
            p <- t.test(y ~ baseFinal2$GRUPO)$p.value
            })
          } else {
            p=1
            try({
            p <- chisq.test(table(y, droplevels(baseFinal2$GRUPO)))$p.value
            })
          }
          s[2] <- sub("<", "&lt;", format.pval(p, digits=3, eps=0.001))
          s
        } else {
          render.default(x=x, name=name, ...)
        }
      }
      
      rndr.strat <- function(label, n, ...) {
        ifelse(n==0, label, render.strat.default(label, n, ...))
      }
      
      table1(  ~ . |GRUPO,data=baseFinal2, droplevels=F, render=rndr, render.strat=rndr.strat, overall=F) 
## Warning in chisq.test(table(y, droplevels(baseFinal2$GRUPO))): Chi-squared
## approximation may be incorrect
Grupo 1
(n=8)
Grupo 2
(n=12)
p-valor
GRUPO
Grupo 1 8 (100%) 0 (0%) NA
Grupo 2 0 (0%) 12 (100%)
p-valor 0 (0%) 0 (0%)
DASH1_dif01
Mean (SD) -1.25 (0.886) -1.50 (1.31) 0.618
Median [Min, Max] -1.50 [-2.00, 0.00] -2.00 [-3.00, 2.00]
DASH10_dif01
Mean (SD) -1.25 (0.886) -0.917 (0.793) 0.405
Median [Min, Max] -1.50 [-2.00, 0.00] -1.00 [-2.00, 0.00]
DASH11_dif01
Mean (SD) -0.750 (1.04) -0.833 (0.937) 0.857
Median [Min, Max] -0.500 [-3.00, 0.00] -1.00 [-3.00, 1.00]
DASH2_dif01
Mean (SD) -1.13 (1.13) -1.50 (1.24) 0.494
Median [Min, Max] -1.00 [-3.00, 0.00] -1.50 [-3.00, 1.00]
DASH3_dif01
Mean (SD) -1.00 (0.926) -1.75 (1.22) 0.136
Median [Min, Max] -1.00 [-3.00, 0.00] -2.00 [-4.00, 0.00]
DASH4_dif01
Mean (SD) -1.00 (1.20) -0.750 (1.06) 0.639
Median [Min, Max] -0.500 [-3.00, 0.00] -1.00 [-3.00, 1.00]
DASH5_dif01
Mean (SD) 0.00 (1.07) -0.583 (1.24) 0.278
Median [Min, Max] 0.00 [-2.00, 1.00] -1.00 [-3.00, 2.00]
DASH6_dif01
Mean (SD) -1.63 (2.00) -1.42 (1.31) 0.8
Median [Min, Max] -2.00 [-4.00, 2.00] -1.50 [-3.00, 2.00]
DASH7_dif01
Mean (SD) -0.500 (1.31) -0.667 (1.30) 0.784
Median [Min, Max] -0.500 [-2.00, 2.00] 0.00 [-3.00, 1.00]
DASH8_dif01
Mean (SD) -0.750 (0.707) -0.667 (1.15) 0.844
Median [Min, Max] -1.00 [-2.00, 0.00] -1.00 [-2.00, 1.00]
DASH9_dif01
Mean (SD) -0.625 (0.744) -0.833 (0.835) 0.567
Median [Min, Max] -0.500 [-2.00, 0.00] -1.00 [-2.00, 1.00]
DASHTO_dif01
Mean (SD) -20.2 (15.8) -25.4 (17.1) 0.495
Median [Min, Max] -18.2 [-47.7, -2.27] -26.1 [-56.8, 6.82]
EVA_dif01
Mean (SD) -3.40 (1.85) -2.71 (1.63) 0.406
Median [Min, Max] -3.50 [-5.90, -1.00] -3.00 [-4.00, 1.00]
DASH1_dif02
Mean (SD) -0.375 (1.06) 0.167 (0.937) 0.261
Median [Min, Max] -0.500 [-2.00, 1.00] 0.00 [-1.00, 2.00]
DASH10_dif02
Mean (SD) -0.500 (0.535) -0.417 (1.38) 0.852
Median [Min, Max] -0.500 [-1.00, 0.00] -1.00 [-2.00, 3.00]
DASH11_dif02
Mean (SD) -0.125 (1.46) -0.0833 (0.669) 0.941
Median [Min, Max] 0.00 [-2.00, 3.00] 0.00 [-1.00, 1.00]
DASH2_dif02
Mean (SD) -0.625 (1.06) -0.167 (0.718) 0.307
Median [Min, Max] -0.500 [-2.00, 1.00] 0.00 [-1.00, 1.00]
DASH3_dif02
Mean (SD) -0.375 (0.518) -0.750 (1.06) 0.306
Median [Min, Max] 0.00 [-1.00, 0.00] -1.00 [-3.00, 1.00]
DASH4_dif02
Mean (SD) -0.500 (0.926) -0.417 (1.31) 0.87
Median [Min, Max] -0.500 [-2.00, 1.00] 0.00 [-4.00, 1.00]
DASH5_dif02
Mean (SD) -0.250 (0.707) -0.417 (1.31) 0.718
Median [Min, Max] 0.00 [-1.00, 1.00] -0.500 [-2.00, 2.00]
DASH6_dif02
Mean (SD) -0.500 (1.60) -0.333 (1.44) 0.816
Median [Min, Max] -1.00 [-2.00, 3.00] -1.00 [-2.00, 3.00]
DASH7_dif02
Mean (SD) -0.500 (0.756) -0.250 (1.48) 0.627
Median [Min, Max] 0.00 [-2.00, 0.00] 0.00 [-3.00, 2.00]
DASH8_dif02
Mean (SD) -0.250 (0.886) -0.500 (1.24) 0.606
Median [Min, Max] -0.500 [-1.00, 1.00] -0.500 [-3.00, 1.00]
DASH9_dif02
Mean (SD) -0.500 (0.756) -0.500 (1.17) 1
Median [Min, Max] 0.00 [-2.00, 0.00] 0.00 [-3.00, 1.00]
DASHTO_dif02
Mean (SD) -15.9 (15.2) -8.70 (20.3) 0.376
Median [Min, Max] -18.2 [-34.1, 9.09] -7.96 [-40.9, 27.3]
EVA_dif02
Mean (SD) -2.89 (1.88) -1.42 (2.01) 0.115
Median [Min, Max] -2.40 [-5.50, -1.00] -1.25 [-5.00, 2.50]