Análise Descritiva

Informações

Total de pacientes: 577

– Perfil Global Entre os 577 pacientes avaliados, 322 (55,8%) realizaram a cirurgia Bypass, e os 255 restantes foram submetidos à cirurgia Sleeve. A colelitíase foi encontrada em 78 (13,5%) pacientes. 448 (77.6%) eram do sexo femino; 315 (54,6%) eram brancos. A média global da idade foi de 40 anos; a média do peso inicial foi de 116 kg; a altura teve média de 1.65 metros e a do Índice de Massa Corporal foi de 42 Kg/m². Dentre os 565 pacientes que tiveram as informações de comorbidades preenchidas, a Esteato-hepatite não alcoólica esteve presente em 271 (48%) pacientes; a Hipertensão Arterial Sistêmica e a Doença Meningocócica esteve presente 209 (37%); a Resistência à Insulina em 165 (29%); Artralgia em 161 (28%); Dislipidemia em 116 (20%); Esofagite em 63 (11%); Apnéia em 55 (10%) e Refluxo em 38 pacientes (7%).

– Perfil Cirurgia Bypass 254 (79%) eram do sexo femino; 186 (58%) eram brancos. A idade média observada foi de 42 anos, a média do peso inicial foi de 115 kg; a altura teve média de 1.65 metros e a do Índice de Massa Corporal foi de 42 Kg/m². A colelitíase foi encontrada em 46 (14,3%) pacientes.

– Perfil Cirurgia Sleeve 194 (76%) eram do sexo femino;129 eram brancos. A idade média observada foi de 38 anos, a média do peso inicial foi de 119 kg; a altura teve média de 1.66 metros e a do Índice de Massa Corporal foi de 43 Kg/m². A colelitíase foi encontrada em 32 (12,6%) pacientes.

—Análise dos Pacientes com colelitíase

Dicionário

VARIÁVEL	DESCRIÇÃO	CARACTERÍSTICAS
NOME	Nome do Paciente	String
SEXO	Gênero do Paciente	0 = Feminino \| 1 = Masculino
IDADE	Idade do Paciente	Numérico ( em Anos)
COR	Cor/Raça do Paciente	0 = Branco \| 1 = Pardo \| 2 = Negro
ALTURA	Altura do Paciente	Numérico (em cm)
PI	Peso Inicial do Paciente	Numérico (em Kg)
IMC	Índice de Massa Corporal do Paciente	Numérico
PESO IDEAL	Peso Ideal para o Paciente	Numérico (em Kg)
PESO PERDIDO	Peso Perdido pós cirurgia do Paciente	Numérico (em Kg)
CIRURGIA	Tipo de Cirurgia	0 = Sleeve \| 1 = Bypass
HAS	Hipertensão Arterial Sistêmica	0 = Não \| 1 = Sim
DM	Doença Meningocócica	0 = Não \| 1 = Sim
RESIST INS	Resistência á Insulina	0 = Não \| 1 = Sim
DISLIP	Dislipidemia	0 = Não \| 1 = Sim
NASH	Esteato-hepatite não alcoólica	0 = Não \| 1 = Sim
APNÉIA	Apnéia	0 = Não \| 1 = Sim
ARTRALGIA	Artralgia	0 = Não \| 1 = Sim
ESOFAGITE	Esofagite	0 = Não \| 1 = Sim
REFLUXO	Refluxo	0 = Não \| 1 = Sim

Variáveis Numéricas

	Minímo	Mediana	Máximo	Média	Desvio.Padrão	CV	Assimetria
IDADE	17.00	38.00	76.00	39.41	9.87	0.25	0.60
ALTURA	1.31	1.64	1.96	1.65	0.09	0.06	0.44
PI	50.00	114.00	248.00	115.97	22.41	0.19	1.35
IMC	18.82	41.33	83.25	42.17	5.92	0.14	1.57
PESO_IDEAL	40.50	57.00	74.00	57.73	4.77	0.08	0.65
PEP	0.17	0.57	1.00	0.57	0.16	0.28	0.26
PESO_PERDIDO	10.00	29.00	55.00	29.90	9.14	0.31	0.30
TEMPO_DX	1.00	7.00	44.00	9.23	7.51	0.81	1.88

Correlação

Variáveis Categorias

##         SEXO         COR        CIRURGIA     HAS         DM      RESIST_INS
##  Feminino :448   Branco:315   Sleeve:255   Não :356   Não :356   Não :400  
##  Masculino:129   Pardo :208   Bypass:322   Sim :209   Sim :209   Sim :165  
##                  Negro : 54                NA's: 12   NA's: 12   NA's: 12  
##   DISLIP      NASH      APNEIA    ARTRALGIA  ESOFAGITE  REFLUXO    COLELITIASE
##  Não :449   Não :294   Não :510   Não :404   Não :502   Não :527   Não:499    
##  Sim :116   Sim :271   Sim : 55   Sim :161   Sim : 63   Sim : 38   Sim: 78    
##  NA's: 12   NA's: 12   NA's: 12   NA's: 12   NA's: 12   NA's: 12              
##   HERNIA   
##  Não : 70  
##  Sim :  8  
##  NA's:499

Dados Faltantes

##                                   Descrição Total_NA
## PESO_PERDIDO                   PESO PERDIDO      500
## PEP                PERDA DE EXCESSO DE PESO      499
## TEMPO_DX                           TEMPO_DX      499
## HERNIA                               HERNIA      499
## HAS          HIPERTENSÃO ARTERIAL SISTÊMICA       12
## DM                     DOENÇA MENINGOCÓCICA       12
## RESIST_INS           RESISTÊNCIA Á INSULINA       12
## DISLIP                         DISLIPIDEMIA       12
## NASH         ESTEATO-HEPATITE NÃO ALCOÓLICA       12
## APNEIA                               APNEIA       12
## ARTRALGIA                         ARTRALGIA       12
## ESOFAGITE                         ESOFAGITE       12
## REFLUXO                             REFLUXO       12
## SEXO                                   SEXO        0
## IDADE                                 IDADE        0
## COR                                     COR        0
## ALTURA                               ALTURA        0
## PI                             PESO INICIAL        0
## IMC                                     IMC        0
## PESO_IDEAL                       PESO IDEAL        0
## CIRURGIA                           CIRURGIA        0
## COLELITIASE                     COLELITIASE        0

Colelitiase

## NULL

Perfil

Perfil Pacientes com Colelitiase

	Minímo	Mediana	Máximo	Média	Desvio.Padrão	CV	Assimetria
IDADE	25.00	38.00	68.00	39.71	10.33	0.26	0.60
ALTURA	1.45	1.61	1.82	1.64	0.09	0.05	0.44
PI	83.00	108.50	154.00	110.83	16.46	0.15	1.35
IMC	32.02	40.17	58.83	41.40	4.87	0.12	1.57
PESO_IDEAL	47.50	55.50	74.00	57.50	5.92	0.10	0.65
PEP	0.17	0.57	1.00	0.57	0.16	0.28	0.26
PESO_PERDIDO	10.00	29.00	55.00	29.90	9.14	0.31	0.30
TEMPO_DX	1.00	7.00	44.00	9.23	7.51	0.81	1.88

##         SEXO        COR       CIRURGIA   HAS       DM     RESIST_INS DISLIP  
##  Feminino :67   Branco:43   Sleeve:32   Não:51   Não:51   Não:54     Não:62  
##  Masculino:11   Pardo :32   Bypass:46   Sim:27   Sim:27   Sim:24     Sim:16  
##                 Negro : 3                                                    
##   NASH    APNEIA   ARTRALGIA ESOFAGITE REFLUXO  COLELITIASE HERNIA  
##  Não:31   Não:72   Não:53    Não:68    Não:70   Não: 0      Não:70  
##  Sim:47   Sim: 6   Sim:25    Sim:10    Sim: 8   Sim:78      Sim: 8  
##

Pós Cirurgia

Identificação

Gênero

## NULL

##            
##             Não Sim
##   Feminino  381  67
##   Masculino 118  11

##            
##              Não  Sim
##   Feminino  0.66 0.12
##   Masculino 0.20 0.02

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 3.0117, df = 1, p-value = 0.08266

Cor

## NULL

##         
##          Não Sim
##   Branco 272  43
##   Pardo  176  32
##   Negro   51   3

##         
##           Não  Sim
##   Branco 0.47 0.07
##   Pardo  0.31 0.06
##   Negro  0.09 0.01

## 
##  Pearson's Chi-squared test
## 
## data:  cdata
## X-squared = 3.5531, df = 2, p-value = 0.1692

Idade

## 
##  Shapiro-Wilk normality test
## 
## data:  IDADE
## W = 0.97526, p-value = 2.686e-08

## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  IDADE by COLELITIASE
## W = 19617, p-value = 0.9098
## alternative hypothesis: true location shift is not equal to 0

df	0%	10%	20%	30%	40%	50%	60%	70%	80%	90%	100%
Total	17	27	31	34	36	38	40	43	47	54	76
COM Colelitiase	25	27	31	33	36	38	40	43.9	48	55.6	68
SEM Colelitiase	17	27	31	34	37	38	40	43	47	53.2	76

Medidas

IMC

## 
##  Shapiro-Wilk normality test
## 
## data:  IMC
## W = 0.89644, p-value < 2.2e-16

## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  IMC by COLELITIASE
## W = 20988, p-value = 0.2651
## alternative hypothesis: true location shift is not equal to 0

df	0%	10%	20%	30%	40%	50%	60%	70%	80%	90%	100%
Total	18.8	36.1	37.4	38.6	40.1	41.3	42.4	44.1	45.9	49.1	83.2
COM Colelitiase	32	36.4	37.8	38.7	39.8	40.2	41.5	42.3	44.8	47	58.8
SEM Colelitiase	18.8	36.1	37.3	38.6	40.1	41.5	42.7	44.2	46.2	49.2	83.2

Altura

## 
##  Shapiro-Wilk normality test
## 
## data:  ALTURA
## W = 0.98266, p-value = 2.34e-06

## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  ALTURA by COLELITIASE
## W = 21958, p-value = 0.06813
## alternative hypothesis: true location shift is not equal to 0

df	0%	10%	20%	30%	40%	50%	60%	70%	80%	90%	100%
Total	1.31	1.54	1.58	1.6	1.62	1.64	1.67	1.69	1.73	1.77	1.96
COM Colelitiase	1.45	1.54	1.57	1.59	1.61	1.61	1.64	1.67	1.71	1.77	1.82
SEM Colelitiase	1.31	1.54	1.58	1.6	1.62	1.64	1.67	1.69	1.73	1.78	1.96

Peso Inicial

## 
##  Shapiro-Wilk normality test
## 
## data:  PI
## W = 0.92017, p-value < 2.2e-16

## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  PI by COLELITIASE
## W = 22133, p-value = 0.051
## alternative hypothesis: true location shift is not equal to 0

df	0%	10%	20%	30%	40%	50%	60%	70%	80%	90%	100%
Total	50	93	98	102	107	114	118	123	132	142	248
COM Colelitiase	83	90.3	95.4	101.1	104.8	108.5	113.2	116.9	124.2	133.2	154
SEM Colelitiase	50	93	98	103	108	114	119.8	124	132	143.2	248

Peso Ideal

## 
##  Shapiro-Wilk normality test
## 
## data:  PESO_IDEAL
## W = 0.97026, p-value = 2.001e-09

## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  PESO_IDEAL by COLELITIASE
## W = 21465, p-value = 0.1432
## alternative hypothesis: true location shift is not equal to 0

df	0%	10%	20%	30%	40%	50%	60%	70%	80%	90%	100%
Total	40.5	52	54	55	56	57	58.5	59.5	61.5	64	74
COM Colelitiase	47.5	51.9	53.5	54.5	55.5	55.5	57.5	58.5	60.8	63.8	74
SEM Colelitiase	40.5	52	54	55.2	56.1	57	58.5	59.5	61.5	64	73

Cirurgia

Bypass

	Minímo	Mediana	Máximo	Média	Desvio.Padrão	CV	Assimetria
IDADE	19.00	40.00	76.00	41.22	9.96	0.24	0.60
ALTURA	1.31	1.64	1.94	1.65	0.09	0.05	0.44
PI	50.00	113.00	200.00	114.21	20.10	0.18	1.35
IMC	18.82	41.12	83.25	41.85	6.07	0.15	1.57
PESO_IDEAL	40.50	57.00	74.00	57.52	4.72	0.08	0.65
PEP	0.17	0.57	1.00	0.57	0.18	0.31	0.26
PESO_PERDIDO	10.00	28.00	50.00	29.15	9.70	0.33	0.30
TEMPO_DX	1.00	6.00	24.00	7.67	5.85	0.76	1.88

##         SEXO         COR        CIRURGIA     HAS         DM      RESIST_INS
##  Feminino :254   Branco:186   Sleeve:  0   Não :186   Não :186   Não :234  
##  Masculino: 68   Pardo :112   Bypass:322   Sim :127   Sim :127   Sim : 79  
##                  Negro : 24                NA's:  9   NA's:  9   NA's:  9  
##   DISLIP      NASH      APNEIA    ARTRALGIA  ESOFAGITE  REFLUXO    COLELITIASE
##  Não :240   Não :156   Não :283   Não :236   Não :256   Não :282   Não:276    
##  Sim : 73   Sim :157   Sim : 30   Sim : 77   Sim : 57   Sim : 31   Sim: 46    
##  NA's:  9   NA's:  9   NA's:  9   NA's:  9   NA's:  9   NA's:  9              
##   HERNIA   
##  Não : 41  
##  Sim :  5  
##  NA's:276

Slevee

	Minímo	Mediana	Máximo	Média	Desvio.Padrão	CV	Assimetria
IDADE	17.00	36.00	71.00	37.13	9.28	0.25	0.60
ALTURA	1.45	1.65	1.96	1.66	0.10	0.06	0.44
PI	79.00	114.00	248.00	118.19	24.89	0.21	1.35
IMC	32.87	41.62	71.67	42.59	5.72	0.13	1.57
PESO_IDEAL	47.50	57.50	73.00	58.00	4.83	0.08	0.65
PEP	0.37	0.58	0.99	0.59	0.14	0.25	0.26
PESO_PERDIDO	18.00	29.00	55.00	30.94	8.34	0.27	0.30
TEMPO_DX	1.00	8.50	44.00	11.47	9.05	0.79	1.88

##         SEXO         COR        CIRURGIA     HAS         DM      RESIST_INS
##  Feminino :194   Branco:129   Sleeve:255   Não :170   Não :170   Não :166  
##  Masculino: 61   Pardo : 96   Bypass:  0   Sim : 82   Sim : 82   Sim : 86  
##                  Negro : 30                NA's:  3   NA's:  3   NA's:  3  
##   DISLIP      NASH      APNEIA    ARTRALGIA  ESOFAGITE  REFLUXO    COLELITIASE
##  Não :209   Não :138   Não :227   Não :168   Não :246   Não :245   Não:223    
##  Sim : 43   Sim :114   Sim : 25   Sim : 84   Sim :  6   Sim :  7   Sim: 32    
##  NA's:  3   NA's:  3   NA's:  3   NA's:  3   NA's:  3   NA's:  3              
##   HERNIA   
##  Não : 29  
##  Sim :  3  
##  NA's:223

Cirurgia x Colelitiase

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 0.23361, df = 1, p-value = 0.6289

Comorbidades

Hipertensão Arterial Sistêmica

(HAS)

##      
##       Não Sim
##   Não 305  51
##   Sim 182  27

##      
##        Não  Sim
##   Não 0.54 0.09
##   Sim 0.32 0.05

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 0.11684, df = 1, p-value = 0.7325

Doença Meningocócica

(DM)

##      
##       Não Sim
##   Não 305  51
##   Sim 182  27

##      
##        Não  Sim
##   Não 0.54 0.09
##   Sim 0.32 0.05

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 0.11684, df = 1, p-value = 0.7325

Resistência á Insulina

(RESIST INS)

##      
##       Não Sim
##   Não 346  54
##   Sim 141  24

##      
##        Não  Sim
##   Não 0.61 0.10
##   Sim 0.25 0.04

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 0.037423, df = 1, p-value = 0.8466

Dislipidemia

(DISLIP)

##      
##       Não Sim
##   Não 387  62
##   Sim 100  16

##      
##        Não  Sim
##   Não 0.68 0.11
##   Sim 0.18 0.03

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 3.6247e-31, df = 1, p-value = 1

Esteato-hepatite não alcoólica

(NASH)

##      
##       Não Sim
##   Não 263  31
##   Sim 224  47

##      
##        Não  Sim
##   Não 0.47 0.05
##   Sim 0.40 0.08

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 4.9216, df = 1, p-value = 0.02652

Apnéia

##      
##       Não Sim
##   Não 438  72
##   Sim  49   6

##      
##        Não  Sim
##   Não 0.78 0.13
##   Sim 0.09 0.01

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 0.20219, df = 1, p-value = 0.653

Artralgia

##      
##       Não Sim
##   Não 351  53
##   Sim 136  25

##      
##        Não  Sim
##   Não 0.62 0.09
##   Sim 0.24 0.04

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 0.3773, df = 1, p-value = 0.5391

Esofagite

##      
##       Não Sim
##   Não 434  68
##   Sim  53  10

##      
##        Não  Sim
##   Não 0.77 0.12
##   Sim 0.09 0.02

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 0.096724, df = 1, p-value = 0.7558

Refluxo

##      
##       Não Sim
##   Não 457  70
##   Sim  30   8

##      
##        Não  Sim
##   Não 0.81 0.12
##   Sim 0.05 0.01

## 
##  Pearson's Chi-squared test with Yates' continuity correction
## 
## data:  cdata
## X-squared = 1.2046, df = 1, p-value = 0.2724

Testes Proporção

chisq.test(table(df.colelitiase$COR), p=c(1/3,1/3,1/3))

## 
##  Chi-squared test for given probabilities
## 
## data:  table(df.colelitiase$COR)
## X-squared = 32.846, df = 2, p-value = 7.371e-08

# Sexo
prop.test(c(67,11),c(78,78), alternative = "greater")

## 
##  2-sample test for equality of proportions with continuity correction
## 
## data:  c(67, 11) out of c(78, 78)
## X-squared = 77.564, df = 1, p-value < 2.2e-16
## alternative hypothesis: greater
## 95 percent confidence interval:
##  0.6134568 1.0000000
## sample estimates:
##    prop 1    prop 2 
## 0.8589744 0.1410256

# Cor
chisq.test(table(df.colelitiase$COR), p=c(1/3,1/3,1/3))

## 
##  Chi-squared test for given probabilities
## 
## data:  table(df.colelitiase$COR)
## X-squared = 32.846, df = 2, p-value = 7.371e-08

# Cirurgia
prop.test(c(46,32),c(78,78), alternative = "greater")

## 
##  2-sample test for equality of proportions with continuity correction
## 
## data:  c(46, 32) out of c(78, 78)
## X-squared = 4.3333, df = 1, p-value = 0.01869
## alternative hypothesis: greater
## 95 percent confidence interval:
##  0.03711164 1.00000000
## sample estimates:
##    prop 1    prop 2 
## 0.5897436 0.4102564

# Pos Cirurgia
shapiro.test(df.colelitiase$PEP)

## 
##  Shapiro-Wilk normality test
## 
## data:  df.colelitiase$PEP
## W = 0.98732, p-value = 0.6367

wilcox.test(df.colelitiase$PEP ~ df.colelitiase$CIRURGIA)

## Warning in wilcox.test.default(x = c(0.426229508196721, 0.727272727272727, :
## cannot compute exact p-value with ties

## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  df.colelitiase$PEP by df.colelitiase$CIRURGIA
## W = 772.5, p-value = 0.7146
## alternative hypothesis: true location shift is not equal to 0

shapiro.test(df.colelitiase$PI)

## 
##  Shapiro-Wilk normality test
## 
## data:  df.colelitiase$PI
## W = 0.96366, p-value = 0.02533

wilcox.test(df.colelitiase$PI ~ df.colelitiase$CIRURGIA)

## Warning in wilcox.test.default(x = c(145, 121, 130, 95, 120, 90, 98, 100, :
## cannot compute exact p-value with ties

## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  df.colelitiase$PI by df.colelitiase$CIRURGIA
## W = 746.5, p-value = 0.919
## alternative hypothesis: true location shift is not equal to 0

shapiro.test(df.colelitiase$TEMPO_DX)

## 
##  Shapiro-Wilk normality test
## 
## data:  df.colelitiase$TEMPO_DX
## W = 0.81591, p-value = 1.851e-08

wilcox.test(df.colelitiase$TEMPO_DX ~ df.colelitiase$CIRURGIA,alternative ="greater")

## Warning in wilcox.test.default(x = c(24, 24, 7, 10, 11, 7, 1, 4, 2, 24, : cannot
## compute exact p-value with ties

## 
##  Wilcoxon rank sum test with continuity correction
## 
## data:  df.colelitiase$TEMPO_DX by df.colelitiase$CIRURGIA
## W = 962.5, p-value = 0.01058
## alternative hypothesis: true location shift is greater than 0

c("two.sided", "less", "greater")

## [1] "two.sided" "less"      "greater"

Análise Descritiva - TCC

Agda Costa

20/06/2021