GONZALO
Carro Gabriela
2026-08-31
Análisis descriptivo. Tabla con la descripción de la población
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 53 9.89 2.96 9 9.74 2.97 5 18 13 0.5 -0.41 0.41##
## 1 2
## 30 23##
## 1 2
## 0.566 0.434| Characteristic | N = 531 |
|---|---|
| SEXO | |
| 1 | 30 (56.6%) |
| 2 | 23 (43.4%) |
| CAUSA | |
| 1 | 5 (9.4%) |
| 2 | 48 (90.6%) |
| ENF_BASE | |
| 1 | 13 (24.5%) |
| 2 | 18 (34.0%) |
| 3 | 17 (32.1%) |
| 4 | 5 (9.4%) |
| MANO_1 | |
| 1 | 22 (41.5%) |
| 2 | 20 (37.7%) |
| 3 | 2 (3.8%) |
| 4 | 5 (9.4%) |
| 5 | 4 (7.5%) |
| ELECT | |
| 1 | 40 (75.5%) |
| 2 | 13 (24.5%) |
| MANO_2 | |
| 1 | 17 (32.1%) |
| 2 | 9 (17.0%) |
| 4 | 2 (3.8%) |
| 5 | 10 (18.9%) |
| 6 | 15 (28.3%) |
| RESP | |
| 1 | 22 (41.5%) |
| 2 | 7 (13.2%) |
| 3 | 9 (17.0%) |
| 4 | 15 (28.3%) |
| 1 n (%) | |
Presencia de disinergia antes y después
##
## NO SI
## 0.05 0.95##
## NO SI
## 2 38##
## NO SI
## 0.25 0.75##
## NO SI
## 10 30“Describir la distribución de los subtipos de disinergia rectoesfinteriana tipo I, II, III y IV según la patología #de base: constipación funcional refractaria, incontinencia fecal no retentiva, malformación anorrectal operada y #mielomeningocele.
##
## Adjuntando el paquete: 'table1'## The following objects are masked from 'package:Hmisc':
##
## label, label<-, units## The following objects are masked from 'package:base':
##
## units, units<-| CFR (N=17) |
INFR (N=5) |
MAR (N=18) |
MMC (N=13) |
Overall (N=53) |
|
|---|---|---|---|---|---|
| EDAD | |||||
| Mean (SD) | 10.0 (2.35) | 9.20 (3.63) | 9.39 (3.40) | 10.7 (2.93) | 9.89 (2.96) |
| Median [Min, Max] | 10.0 [6.00, 14.0] | 8.00 [5.00, 13.0] | 8.00 [5.00, 18.0] | 10.0 [7.00, 16.0] | 9.00 [5.00, 18.0] |
| SEXO | |||||
| 1 | 12 (70.6%) | 2 (40.0%) | 9 (50.0%) | 7 (53.8%) | 30 (56.6%) |
| 2 | 5 (29.4%) | 3 (60.0%) | 9 (50.0%) | 6 (46.2%) | 23 (43.4%) |
| CAUSA | |||||
| 1 | 5 (29.4%) | 0 (0%) | 0 (0%) | 0 (0%) | 5 (9.4%) |
| 2 | 12 (70.6%) | 5 (100%) | 18 (100%) | 13 (100%) | 48 (90.6%) |
| MANO_1 | |||||
| 1 | 7 (41.2%) | 2 (40.0%) | 9 (50.0%) | 4 (30.8%) | 22 (41.5%) |
| 2 | 7 (41.2%) | 1 (20.0%) | 5 (27.8%) | 7 (53.8%) | 20 (37.7%) |
| 3 | 1 (5.9%) | 0 (0%) | 1 (5.6%) | 0 (0%) | 2 (3.8%) |
| 4 | 0 (0%) | 2 (40.0%) | 2 (11.1%) | 1 (7.7%) | 5 (9.4%) |
| 5 | 2 (11.8%) | 0 (0%) | 1 (5.6%) | 1 (7.7%) | 4 (7.5%) |
| ELECT | |||||
| 1 | 10 (58.8%) | 4 (80.0%) | 16 (88.9%) | 10 (76.9%) | 40 (75.5%) |
| 2 | 7 (41.2%) | 1 (20.0%) | 2 (11.1%) | 3 (23.1%) | 13 (24.5%) |
| MANO_2 | |||||
| 1 | 6 (35.3%) | 4 (80.0%) | 5 (27.8%) | 2 (15.4%) | 17 (32.1%) |
| 2 | 2 (11.8%) | 0 (0%) | 4 (22.2%) | 3 (23.1%) | 9 (17.0%) |
| 4 | 0 (0%) | 0 (0%) | 2 (11.1%) | 0 (0%) | 2 (3.8%) |
| 5 | 2 (11.8%) | 0 (0%) | 5 (27.8%) | 3 (23.1%) | 10 (18.9%) |
| 6 | 7 (41.2%) | 1 (20.0%) | 2 (11.1%) | 5 (38.5%) | 15 (28.3%) |
| RESP | |||||
| 1 | 5 (29.4%) | 1 (20.0%) | 10 (55.6%) | 6 (46.2%) | 22 (41.5%) |
| 2 | 2 (11.8%) | 1 (20.0%) | 4 (22.2%) | 0 (0%) | 7 (13.2%) |
| 3 | 3 (17.6%) | 2 (40.0%) | 2 (11.1%) | 2 (15.4%) | 9 (17.0%) |
| 4 | 7 (41.2%) | 1 (20.0%) | 2 (11.1%) | 5 (38.5%) | 15 (28.3%) |
| CFR (N=17) |
INFR (N=5) |
MAR (N=18) |
MMC (N=13) |
Overall (N=53) |
|
|---|---|---|---|---|---|
| Tipo_disinergia | |||||
| 1 | 7 (41.2%) | 2 (40.0%) | 9 (50.0%) | 4 (30.8%) | 22 (41.5%) |
| 2 | 7 (41.2%) | 1 (20.0%) | 5 (27.8%) | 7 (53.8%) | 20 (37.7%) |
| 3 | 1 (5.9%) | 0 (0%) | 1 (5.6%) | 0 (0%) | 2 (3.8%) |
| 4 | 0 (0%) | 2 (40.0%) | 2 (11.1%) | 1 (7.7%) | 5 (9.4%) |
| 5 | 2 (11.8%) | 0 (0%) | 1 (5.6%) | 1 (7.7%) | 4 (7.5%) |
## Warning in ModuleReturnVarsExist(vars, data): The data frame does not have:
## presen1 presen2 Dropped## Warning in ModuleReturnVarsExist(factorVars, data): The data frame does not
## have: presen1 presen2 Dropped## Stratified by ENFERMEDAD
## level Overall CFR INFR MAR
## n 53 17 5 18
## SEXO (%) 1 30 (56.6) 12 (70.6) 2 ( 40.0) 9 ( 50.0)
## 2 23 (43.4) 5 (29.4) 3 ( 60.0) 9 ( 50.0)
## CAUSA (%) 1 5 ( 9.4) 5 (29.4) 0 ( 0.0) 0 ( 0.0)
## 2 48 (90.6) 12 (70.6) 5 (100.0) 18 (100.0)
## MANO_1 (%) 1 22 (41.5) 7 (41.2) 2 ( 40.0) 9 ( 50.0)
## 2 20 (37.7) 7 (41.2) 1 ( 20.0) 5 ( 27.8)
## 3 2 ( 3.8) 1 ( 5.9) 0 ( 0.0) 1 ( 5.6)
## 4 5 ( 9.4) 0 ( 0.0) 2 ( 40.0) 2 ( 11.1)
## 5 4 ( 7.5) 2 (11.8) 0 ( 0.0) 1 ( 5.6)
## ELECT (%) 1 40 (75.5) 10 (58.8) 4 ( 80.0) 16 ( 88.9)
## 2 13 (24.5) 7 (41.2) 1 ( 20.0) 2 ( 11.1)
## MANO_2 (%) 1 17 (32.1) 6 (35.3) 4 ( 80.0) 5 ( 27.8)
## 2 9 (17.0) 2 (11.8) 0 ( 0.0) 4 ( 22.2)
## 4 2 ( 3.8) 0 ( 0.0) 0 ( 0.0) 2 ( 11.1)
## 5 10 (18.9) 2 (11.8) 0 ( 0.0) 5 ( 27.8)
## 6 15 (28.3) 7 (41.2) 1 ( 20.0) 2 ( 11.1)
## RESP (%) 1 22 (41.5) 5 (29.4) 1 ( 20.0) 10 ( 55.6)
## 2 7 (13.2) 2 (11.8) 1 ( 20.0) 4 ( 22.2)
## 3 9 (17.0) 3 (17.6) 2 ( 40.0) 2 ( 11.1)
## 4 15 (28.3) 7 (41.2) 1 ( 20.0) 2 ( 11.1)
## EDAD (mean (SD)) 9.89 (2.96) 10.00 (2.35) 9.20 (3.63) 9.39 (3.40)
## Stratified by ENFERMEDAD
## MMC p test
## n 13
## SEXO (%) 7 ( 53.8) 0.517
## 6 ( 46.2)
## CAUSA (%) 0 ( 0.0) 0.009
## 13 (100.0)
## MANO_1 (%) 4 ( 30.8) 0.523
## 7 ( 53.8)
## 0 ( 0.0)
## 1 ( 7.7)
## 1 ( 7.7)
## ELECT (%) 10 ( 76.9) 0.225
## 3 ( 23.1)
## MANO_2 (%) 2 ( 15.4) 0.182
## 3 ( 23.1)
## 0 ( 0.0)
## 3 ( 23.1)
## 5 ( 38.5)
## RESP (%) 6 ( 46.2) 0.310
## 0 ( 0.0)
## 2 ( 15.4)
## 5 ( 38.5)
## EDAD (mean (SD)) 10.69 (2.93) 0.634## Stratified by ENFERMEDAD
## Overall CFR INFR MAR
## n 53 17 5 18
## SEXO = 2 (%) 23 (43.4) 5 (29.4) 3 ( 60.0) 9 ( 50.0)
## CAUSA = 2 (%) 48 (90.6) 12 (70.6) 5 (100.0) 18 (100.0)
## MANO_1 (%)
## 1 22 (41.5) 7 (41.2) 2 ( 40.0) 9 ( 50.0)
## 2 20 (37.7) 7 (41.2) 1 ( 20.0) 5 ( 27.8)
## 3 2 ( 3.8) 1 ( 5.9) 0 ( 0.0) 1 ( 5.6)
## 4 5 ( 9.4) 0 ( 0.0) 2 ( 40.0) 2 ( 11.1)
## 5 4 ( 7.5) 2 (11.8) 0 ( 0.0) 1 ( 5.6)
## ELECT = 2 (%) 13 (24.5) 7 (41.2) 1 ( 20.0) 2 ( 11.1)
## MANO_2 (%)
## 1 17 (32.1) 6 (35.3) 4 ( 80.0) 5 ( 27.8)
## 2 9 (17.0) 2 (11.8) 0 ( 0.0) 4 ( 22.2)
## 4 2 ( 3.8) 0 ( 0.0) 0 ( 0.0) 2 ( 11.1)
## 5 10 (18.9) 2 (11.8) 0 ( 0.0) 5 ( 27.8)
## 6 15 (28.3) 7 (41.2) 1 ( 20.0) 2 ( 11.1)
## RESP (%)
## 1 22 (41.5) 5 (29.4) 1 ( 20.0) 10 ( 55.6)
## 2 7 (13.2) 2 (11.8) 1 ( 20.0) 4 ( 22.2)
## 3 9 (17.0) 3 (17.6) 2 ( 40.0) 2 ( 11.1)
## 4 15 (28.3) 7 (41.2) 1 ( 20.0) 2 ( 11.1)
## EDAD (mean (SD)) 9.89 (2.96) 10.00 (2.35) 9.20 (3.63) 9.39 (3.40)
## Stratified by ENFERMEDAD
## MMC p test
## n 13
## SEXO = 2 (%) 6 ( 46.2) 0.517
## CAUSA = 2 (%) 13 (100.0) 0.009
## MANO_1 (%) 0.523
## 1 4 ( 30.8)
## 2 7 ( 53.8)
## 3 0 ( 0.0)
## 4 1 ( 7.7)
## 5 1 ( 7.7)
## ELECT = 2 (%) 3 ( 23.1) 0.225
## MANO_2 (%) 0.182
## 1 2 ( 15.4)
## 2 3 ( 23.1)
## 4 0 ( 0.0)
## 5 3 ( 23.1)
## 6 5 ( 38.5)
## RESP (%) 0.310
## 1 6 ( 46.2)
## 2 0 ( 0.0)
## 3 2 ( 15.4)
## 4 5 ( 38.5)
## EDAD (mean (SD)) 10.69 (2.93) 0.634| Overall | CFR | INFR | MAR | MMC | p | test | |
|---|---|---|---|---|---|---|---|
| n | 53 | 17 | 5 | 18 | 13 | ||
| SEXO = 2 (%) | 23 (43.4) | 5 (29.4) | 3 ( 60.0) | 9 ( 50.0) | 6 ( 46.2) | 0.517 | |
| CAUSA = 2 (%) | 48 (90.6) | 12 (70.6) | 5 (100.0) | 18 (100.0) | 13 (100.0) | 0.009 | |
| MANO_1 (%) | 0.523 | ||||||
| 1 | 22 (41.5) | 7 (41.2) | 2 ( 40.0) | 9 ( 50.0) | 4 ( 30.8) | ||
| 2 | 20 (37.7) | 7 (41.2) | 1 ( 20.0) | 5 ( 27.8) | 7 ( 53.8) | ||
| 3 | 2 ( 3.8) | 1 ( 5.9) | 0 ( 0.0) | 1 ( 5.6) | 0 ( 0.0) | ||
| 4 | 5 ( 9.4) | 0 ( 0.0) | 2 ( 40.0) | 2 ( 11.1) | 1 ( 7.7) | ||
| 5 | 4 ( 7.5) | 2 (11.8) | 0 ( 0.0) | 1 ( 5.6) | 1 ( 7.7) | ||
| ELECT = 2 (%) | 13 (24.5) | 7 (41.2) | 1 ( 20.0) | 2 ( 11.1) | 3 ( 23.1) | 0.225 | |
| MANO_2 (%) | 0.182 | ||||||
| 1 | 17 (32.1) | 6 (35.3) | 4 ( 80.0) | 5 ( 27.8) | 2 ( 15.4) | ||
| 2 | 9 (17.0) | 2 (11.8) | 0 ( 0.0) | 4 ( 22.2) | 3 ( 23.1) | ||
| 4 | 2 ( 3.8) | 0 ( 0.0) | 0 ( 0.0) | 2 ( 11.1) | 0 ( 0.0) | ||
| 5 | 10 (18.9) | 2 (11.8) | 0 ( 0.0) | 5 ( 27.8) | 3 ( 23.1) | ||
| 6 | 15 (28.3) | 7 (41.2) | 1 ( 20.0) | 2 ( 11.1) | 5 ( 38.5) | ||
| RESP (%) | 0.310 | ||||||
| 1 | 22 (41.5) | 5 (29.4) | 1 ( 20.0) | 10 ( 55.6) | 6 ( 46.2) | ||
| 2 | 7 (13.2) | 2 (11.8) | 1 ( 20.0) | 4 ( 22.2) | 0 ( 0.0) | ||
| 3 | 9 (17.0) | 3 (17.6) | 2 ( 40.0) | 2 ( 11.1) | 2 ( 15.4) | ||
| 4 | 15 (28.3) | 7 (41.2) | 1 ( 20.0) | 2 ( 11.1) | 5 ( 38.5) | ||
| EDAD (mean (SD)) | 9.89 (2.96) | 10.00 (2.35) | 9.20 (3.63) | 9.39 (3.40) | 10.69 (2.93) | 0.634 |
Evaluar si existe cambio en la presencia de disinergia rectoesfinteriana manométrica, definida como variable dicotómica (presente/ausente), antes y después del tratamiento con electroestimulación sacra transcutánea en pacientes pediátricos con trastornos de la evacuación.
## Despues
## Antes NO SI
## NO 2 0
## SI 8 30##
## McNemar's Chi-squared test with continuity correction
##
## data: tabla_mcnemar
## McNemar's chi-squared = 6, df = 1, p-value = 0.01##
## McNemar's Chi-squared test with continuity correction
##
## data: datos_elec$presen1 and datos_elec$presen2
## McNemar's chi-squared = 6, df = 1, p-value = 0.01## Despues
## Antes NO SI
## NO 2 0
## SI 8 30##
## Exact binomial test
##
## data: b and b + c
## number of successes = 0, number of trials = 8, p-value = 0.008
## alternative hypothesis: true probability of success is not equal to 0.5
## 95 percent confidence interval:
## 0.000 0.369
## sample estimates:
## probability of success
## 0##
## NO SI
## 5 95##
## NO SI
## 25 75##
## NO SI
## 2 38##
## NO SI
## 10 30Evaluar si existe asociación entre el subtipo de disinergia rectoesfinteriana y la patología de base en pacientes pediátricos evaluados mediante manometría anorrectal de alta resolución.
##
## 1 2 3 4 5
## CFR 7 7 1 0 2
## INFR 2 1 0 2 0
## MAR 9 5 1 2 1
## MMC 4 7 0 1 1##
## 1 2 3 4 5
## CFR 31.82 35.00 50.00 0.00 50.00
## INFR 9.09 5.00 0.00 40.00 0.00
## MAR 40.91 25.00 50.00 40.00 25.00
## MMC 18.18 35.00 0.00 20.00 25.00## Cargando paquete requerido: maditr##
## To aggregate all non-grouping columns: take_all(mtcars, mean, by = am)##
## Adjuntando el paquete: 'maditr'## The following objects are masked from 'package:dplyr':
##
## between, coalesce, first, last## The following object is masked from 'package:purrr':
##
## transpose## The following objects are masked from 'package:data.table':
##
## copy, dcast, let, melt## The following object is masked from 'package:readr':
##
## cols## Registered S3 methods overwritten by 'expss':
## method from
## [.labelled Hmisc
## as.data.frame.labelled base
## print.labelled Hmisc##
## Use 'expss_output_viewer()' to display tables in the RStudio Viewer.
## To return to the console output, use 'expss_output_default()'.##
## Adjuntando el paquete: 'expss'## The following object is masked from 'package:naniar':
##
## is_na## The following objects are masked from 'package:broom.helpers':
##
## contains, vars, where## The following object is masked from 'package:ggpubr':
##
## compare_means## The following objects are masked from 'package:gtsummary':
##
## contains, vars, where## The following objects are masked from 'package:stringr':
##
## fixed, regex## The following objects are masked from 'package:dplyr':
##
## compute, contains, na_if, recode, vars, where## The following objects are masked from 'package:purrr':
##
## keep, modify, modify_if, when## The following objects are masked from 'package:tidyr':
##
## contains, nest## The following object is masked from 'package:ggplot2':
##
## vars## The following objects are masked from 'package:data.table':
##
## copy, like##
## Adjuntando el paquete: 'DescTools'## The following object is masked from 'package:maditr':
##
## %like%## The following objects are masked from 'package:psych':
##
## AUC, ICC, SD## The following objects are masked from 'package:caret':
##
## MAE, RMSE## The following objects are masked from 'package:Hmisc':
##
## %nin%, Label, Mean, Quantile## The following object is masked from 'package:data.table':
##
## %like%## Welcome to emmeans.
## Caution: You lose important information if you filter this package's results.
## See '? untidy'##
## Adjuntando el paquete: 'emmeans'## The following object is masked from 'package:rms':
##
## contrast
## Warning in chisq.test(tab, correct = FALSE, ...): Chi-squared approximation may
## be incorrect## Cell Contents
## |-------------------------|
## | Count |
## |-------------------------|
##
## ==================================================
## datos$MANO_1
## datos$ENFERMEDAD 1 2 3 4 5 Total
## --------------------------------------------------
## CFR 7 7 1 0 2 17
## --------------------------------------------------
## INFR 2 1 0 2 0 5
## --------------------------------------------------
## MAR 9 5 1 2 1 18
## --------------------------------------------------
## MMC 4 7 0 1 1 13
## --------------------------------------------------
## Total 22 20 2 5 4 53
## ==================================================## Cell Contents
## |-------------------------|
## | Count |
## | Row Percent |
## | Column Percent |
## |-------------------------|
##
## =================================================================
## datos$MANO_1
## datos$ENFERMEDAD 1 2 3 4 5 Total
## -----------------------------------------------------------------
## CFR 7 7 1 0 2 17
## 41.2% 41.2% 5.9% 0.0% 11.8% 32.1%
## 31.8% 35.0% 50.0% 0.0% 50.0%
## -----------------------------------------------------------------
## INFR 2 1 0 2 0 5
## 40.0% 20.0% 0.0% 40.0% 0.0% 9.4%
## 9.1% 5.0% 0.0% 40.0% 0.0%
## -----------------------------------------------------------------
## MAR 9 5 1 2 1 18
## 50.0% 27.8% 5.6% 11.1% 5.6% 34.0%
## 40.9% 25.0% 50.0% 40.0% 25.0%
## -----------------------------------------------------------------
## MMC 4 7 0 1 1 13
## 30.8% 53.8% 0.0% 7.7% 7.7% 24.5%
## 18.2% 35.0% 0.0% 20.0% 25.0%
## -----------------------------------------------------------------
## Total 22 20 2 5 4 53
## 41.5% 37.7% 3.8% 9.4% 7.5%
## =================================================================## Cell Contents
## |-------------------------|
## | Count |
## | Expected Values |
## | Row Percent |
## | Column Percent |
## |-------------------------|
##
## =================================================================
## datos$MANO_1
## datos$ENFERMEDAD 1 2 3 4 5 Total
## -----------------------------------------------------------------
## CFR 7 7 1 0 2 17
## 7.1 6.4 0.6 1.6 1.3
## 41.2% 41.2% 5.9% 0.0% 11.8% 32.1%
## 31.8% 35.0% 50.0% 0.0% 50.0%
## -----------------------------------------------------------------
## INFR 2 1 0 2 0 5
## 2.1 1.9 0.2 0.5 0.4
## 40.0% 20.0% 0.0% 40.0% 0.0% 9.4%
## 9.1% 5.0% 0.0% 40.0% 0.0%
## -----------------------------------------------------------------
## MAR 9 5 1 2 1 18
## 7.5 6.8 0.7 1.7 1.4
## 50.0% 27.8% 5.6% 11.1% 5.6% 34.0%
## 40.9% 25.0% 50.0% 40.0% 25.0%
## -----------------------------------------------------------------
## MMC 4 7 0 1 1 13
## 5.4 4.9 0.5 1.2 1.0
## 30.8% 53.8% 0.0% 7.7% 7.7% 24.5%
## 18.2% 35.0% 0.0% 20.0% 25.0%
## -----------------------------------------------------------------
## Total 22 20 2 5 4 53
## 41.5% 37.7% 3.8% 9.4% 7.5%
## =================================================================
##
## Statistics for All Table Factors
##
## Pearson's Chi-squared test
## ------------------------------------------------------------
## Chi^2 = 11.1 d.f. = 12 p = 0.523
##
## Minimum expected frequency: 0.189
## Cells with Expected Frequency < 5: 15 of 20 (75%)## Cell Contents
## |-------------------------|
## | Count |
## | Expected Values |
## | Row Percent |
## | Column Percent |
## |-------------------------|
##
## =================================================================
## datos$MANO_1
## datos$ENFERMEDAD 1 2 3 4 5 Total
## -----------------------------------------------------------------
## CFR 7 7 1 0 2 17
## 7.1 6.4 0.6 1.6 1.3
## 41.2% 41.2% 5.9% 0.0% 11.8% 32.1%
## 31.8% 35.0% 50.0% 0.0% 50.0%
## -----------------------------------------------------------------
## INFR 2 1 0 2 0 5
## 2.1 1.9 0.2 0.5 0.4
## 40.0% 20.0% 0.0% 40.0% 0.0% 9.4%
## 9.1% 5.0% 0.0% 40.0% 0.0%
## -----------------------------------------------------------------
## MAR 9 5 1 2 1 18
## 7.5 6.8 0.7 1.7 1.4
## 50.0% 27.8% 5.6% 11.1% 5.6% 34.0%
## 40.9% 25.0% 50.0% 40.0% 25.0%
## -----------------------------------------------------------------
## MMC 4 7 0 1 1 13
## 5.4 4.9 0.5 1.2 1.0
## 30.8% 53.8% 0.0% 7.7% 7.7% 24.5%
## 18.2% 35.0% 0.0% 20.0% 25.0%
## -----------------------------------------------------------------
## Total 22 20 2 5 4 53
## 41.5% 37.7% 3.8% 9.4% 7.5%
## =================================================================
##
##
## Fisher's Exact Test for Count Data
## ------------------------------------------------------------
## Alternative hypothesis: two.sided
## p = 0.6
## Minimum expected frequency: 0.189
## Cells with Expected Frequency < 5: 15 of 20 (75%)No existe diferencia
Estimar la proporción de pacientes con mejoría clínica luego del tratamiento con electroestimulación sacra transcutánea que presentan persistencia de un patrón manométrico patológico en la manometría anorrectal postratamiento. Se definirá como mejoría clínica la presencia de continencia total o continencia parcial, y como ausencia de mejoría clínica la persistencia de incontinencia. Se considerará persistencia manométrica patológica a la presencia de disinergia rectoesfinteriana (tipo I, II, III o IV) en la manometría postratamiento.
## Warning: Unknown or uninitialised column: `mano_pato`.## numeric(0)## < table of extent 0 >##
## NO SI
## 0.275 0.725##
## NO SI
## 11 29## ### Mejoría clínica en pacientes con y sin manometría patológica## Stratified by mano_pato
## level Overall NO SI p test
## n 40 10 30
## mejo_clin (%) NO 11 (27.5) 3 (30.0) 8 (26.7) 1.000
## SI 29 (72.5) 7 (70.0) 22 (73.3)## Stratified by mano_pato
## Overall NO SI p test
## n 40 10 30
## mejo_clin = SI (%) 29 (72.5) 7 (70.0) 22 (73.3) 1.000| Overall | NO | SI | p | test | |
|---|---|---|---|---|---|
| n | 40 | 10 | 30 | ||
| mejo_clin = SI (%) | 29 (72.5) | 7 (70.0) | 22 (73.3) | 1.000 |
##
## 1 2
## 40 13#mejoría clínica pos electorestimulacion
catvars = c( "ELECT","RESP")
#edad y enojo son continuas
vars = c("RESP")
tabla_tres <- CreateTableOne(
vars = vars,
strata = "ELECT",
factorVars = catvars,
data = datos
)
cat("### Mejoría clínica en pacientes con y sin manometría patológica\n\n")## ### Mejoría clínica en pacientes con y sin manometría patológicaprint(tabla_tres, showAllLevels = TRUE, overall = TRUE)## Stratified by ELECT
## level 1 2 p test
## n 40 13
## RESP (%) 1 22 (55.0) 0 ( 0.0) <0.001
## 2 7 (17.5) 0 ( 0.0)
## 3 9 (22.5) 0 ( 0.0)
## 4 2 ( 5.0) 13 (100.0)print(tabla_tres)## Stratified by ELECT
## 1 2 p test
## n 40 13
## RESP (%) <0.001
## 1 22 (55.0) 0 ( 0.0)
## 2 7 (17.5) 0 ( 0.0)
## 3 9 (22.5) 0 ( 0.0)
## 4 2 ( 5.0) 13 (100.0)kableone(tabla_tres)| 1 | 2 | p | test | |
|---|---|---|---|---|
| n | 40 | 13 | ||
| RESP (%) | <0.001 | |||
| 1 | 22 (55.0) | 0 ( 0.0) | ||
| 2 | 7 (17.5) | 0 ( 0.0) | ||
| 3 | 9 (22.5) | 0 ( 0.0) | ||
| 4 | 2 ( 5.0) | 13 (100.0) |
table5<-table(datos_elec$mejo_clin)
table5_prop<-prop.table(table5)
kableone(table5_prop)| Var1 | Freq |
|---|---|
| NO | 0.275 |
| SI | 0.725 |
kableone(table5)| Var1 | Freq |
|---|---|
| NO | 11 |
| SI | 29 |
table5 <- table(datos_elec$mejo_clin)
tabla_mejoria <- data.frame(
Mejoria_clinica = names(table5),
n = as.vector(table5),
Porcentaje = round(as.vector(prop.table(table5)) * 100, 1)
)
tabla_mejoria## Mejoria_clinica n Porcentaje
## 1 NO 11 27.5
## 2 SI 29 72.5