#df
#packages
library("tidyverse")
#t.test por genero - funcion física
t.test(df$Función.física~df$Genero)
Welch Two Sample t-test
data: df$Función.física by df$Genero
t = -0.88142, df = 35.146, p-value = 0.3841
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-2.698558 1.064500
sample estimates:
mean in group F mean in group M
16.79167 17.60870
#t.test genero - psicosocial
t.test(df$Función.psicosocial~df$Genero)
Welch Two Sample t-test
data: df$Función.psicosocial by df$Genero
t = 0.058917, df = 44.988, p-value = 0.9533
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-2.104154 2.230966
sample estimates:
mean in group F mean in group M
26.54167 26.47826
#t.test genero - dolor y malestar
t.test(df$Dolor.y.malestar~df$Genero)
Welch Two Sample t-test
data: df$Dolor.y.malestar by df$Genero
t = -1.0077, df = 36.033, p-value = 0.3203
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-1.7191384 0.5778341
sample estimates:
mean in group F mean in group M
8.125000 8.695652
#t.test genero - total
t.test(df$TOTAL.GOHAI~df$Genero)
Welch Two Sample t-test
data: df$TOTAL.GOHAI by df$Genero
t = -0.66074, df = 37.019, p-value = 0.5129
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-5.385133 2.736583
sample estimates:
mean in group F mean in group M
51.45833 52.78261
#ANOVA para nivel educacional - funcion fisica
summary(anova1)
Df Sum Sq Mean Sq F value Pr(>F)
df$Nivel.educativo_dic 4 22.0 5.512 0.513 0.726
Residuals 42 451.2 10.744
#ANOVA para nivel educacional - funcion psicosocial
summary(anova2)
Df Sum Sq Mean Sq F value Pr(>F)
df$Nivel.educativo_dic 4 74.3 18.57 1.446 0.236
Residuals 42 539.5 12.84
#ANOVA para nivel educacional - door y malestar
summary(anova3)
Df Sum Sq Mean Sq F value Pr(>F)
df$Nivel.educativo_dic 4 7.55 1.887 0.467 0.76
Residuals 42 169.77 4.042
#ANOVA para nivel educacional - total
summary(anova4)
Df Sum Sq Mean Sq F value Pr(>F)
df$Nivel.educativo_dic 4 118.8 29.71 0.602 0.663
Residuals 42 2071.6 49.32
#t.test para estado de vida - funcion fisica
t.test(df$Función.física~df$Estado.de.vida)
Welch Two Sample t-test
data: df$Función.física by df$Estado.de.vida
t = -0.31955, df = 10.422, p-value = 0.7556
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-4.117518 3.079680
sample estimates:
mean in group Con otros mean in group Solo
17.08108 17.60000
#t.test para estado de vida - funcion psicosocial
t.test(df$Función.psicosocial~df$Estado.de.vida)
Welch Two Sample t-test
data: df$Función.psicosocial by df$Estado.de.vida
t = -0.50377, df = 10.83, p-value = 0.6245
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-4.708862 2.957511
sample estimates:
mean in group Con otros mean in group Solo
26.32432 27.20000
#t.test para estado de vida - dolor y malestar
t.test(df$Dolor.y.malestar~df$Estado.de.vida)
Welch Two Sample t-test
data: df$Dolor.y.malestar by df$Estado.de.vida
t = -0.74199, df = 15.027, p-value = 0.4695
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-1.9465491 0.9411437
sample estimates:
mean in group Con otros mean in group Solo
8.297297 8.800000
#t.test para estado de vida - total
t.test(df$TOTAL.GOHAI~df$Estado.de.vida)
Welch Two Sample t-test
data: df$TOTAL.GOHAI by df$Estado.de.vida
t = -0.52997, df = 10.247, p-value = 0.6074
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-9.848078 6.053483
sample estimates:
mean in group Con otros mean in group Solo
51.7027 53.6000
#t.test capaz de pagar gastos subsistencia- función física
t.test(df$Función.física~df$Capaz.de.pagar.los.gastos.de.subsistencia)
Welch Two Sample t-test
data: df$Función.física by df$Capaz.de.pagar.los.gastos.de.subsistencia
t = 6.107, df = 44, p-value = 2.349e-07
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
1.965312 3.901354
sample estimates:
mean in group no mean in group si
20.00000 17.06667
#t.test capaz de pagar gastos subsistencia-psicosocial
t.test(df$Función.psicosocial~df$Capaz.de.pagar.los.gastos.de.subsistencia)
Welch Two Sample t-test
data: df$Función.psicosocial by df$Capaz.de.pagar.los.gastos.de.subsistencia
t = 2.2782, df = 1.6928, p-value = 0.1729
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-3.271455 8.471455
sample estimates:
mean in group no mean in group si
29.0 26.4
#t.test capaz de pagar gastos subsistencia-dolor y maletar
t.test(df$Dolor.y.malestar~df$Capaz.de.pagar.los.gastos.de.subsistencia)
Welch Two Sample t-test
data: df$Dolor.y.malestar by df$Capaz.de.pagar.los.gastos.de.subsistencia
t = 5.6548, df = 44, p-value = 1.083e-06
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
1.072667 2.260666
sample estimates:
mean in group no mean in group si
10.000000 8.333333
#t.test capaz de pagar gastos subsistencia-total
t.test(df$TOTAL.GOHAI~df$Capaz.de.pagar.los.gastos.de.subsistencia)
Welch Two Sample t-test
data: df$TOTAL.GOHAI by df$Capaz.de.pagar.los.gastos.de.subsistencia
t = 5.0224, df = 4.1194, p-value = 0.006822
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
3.264837 11.135163
sample estimates:
mean in group no mean in group si
59.0 51.8
#t.test para presencia de dolor bucal - función física
t.test(df$Función.física~df$Presencia.dolor.bucal)
Welch Two Sample t-test
data: df$Función.física by df$Presencia.dolor.bucal
t = 1.6114, df = 18.606, p-value = 0.1239
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.5717644 4.3741837
sample estimates:
mean in group no mean in group si
17.83871 15.93750
#t.test presencia de dolor bucal-psicosocial
t.test(df$Función.psicosocial~df$Presencia.dolor.bucal)
Welch Two Sample t-test
data: df$Función.psicosocial by df$Presencia.dolor.bucal
t = 1.5685, df = 20.805, p-value = 0.1319
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.6552518 4.6673486
sample estimates:
mean in group no mean in group si
27.19355 25.18750
#t.test presencia de dolor bucal-dolor y malestar
t.test(df$Dolor.y.malestar~df$Presencia.dolor.bucal)
Welch Two Sample t-test
data: df$Dolor.y.malestar by df$Presencia.dolor.bucal
t = 2.9736, df = 19.231, p-value = 0.007733
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
0.5754483 3.3035840
sample estimates:
mean in group no mean in group si
9.064516 7.125000
#t.test presencia de dolor bucal-total
t.test(df$TOTAL.GOHAI~df$Presencia.dolor.bucal)
Welch Two Sample t-test
data: df$TOTAL.GOHAI by df$Presencia.dolor.bucal
t = 2.4762, df = 19.509, p-value = 0.02258
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
0.9135172 10.7800311
sample estimates:
mean in group no mean in group si
54.09677 48.25000
#t.test para presencia de halitosis - funcion fisica
t.test(df$Función.física~df$Halitosis.percibida)
Welch Two Sample t-test
data: df$Función.física by df$Halitosis.percibida
t = -0.48961, df = 26.6, p-value = 0.6284
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-2.607656 1.603489
sample estimates:
mean in group no mean in group si
17.03125 17.53333
#t.test para presencia de halitosis -psicosocial
t.test(df$Función.psicosocial~df$Halitosis.percibida)
Welch Two Sample t-test
data: df$Función.psicosocial by df$Halitosis.percibida
t = -0.58051, df = 33.222, p-value = 0.5655
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-2.796135 1.554468
sample estimates:
mean in group no mean in group si
26.31250 26.93333
#t.test para presencia de halitosis -dolor y maletar
t.test(df$Dolor.y.malestar~df$Halitosis.percibida)
Welch Two Sample t-test
data: df$Dolor.y.malestar by df$Halitosis.percibida
t = 1.4568, df = 21.243, p-value = 0.1598
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-0.4203007 2.3911340
sample estimates:
mean in group no mean in group si
8.718750 7.733333
#t.test para presencia de halitosis -total
t.test(df$TOTAL.GOHAI~df$Halitosis.percibida)
Welch Two Sample t-test
data: df$TOTAL.GOHAI by df$Halitosis.percibida
t = -0.062277, df = 26.723, p-value = 0.9508
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-4.66986 4.39486
sample estimates:
mean in group no mean in group si
52.0625 52.2000
#t.test sequedad de boca -funcion fisica
t.test(df$Función.física~df$Sequedad.de.boca.percibida)
Welch Two Sample t-test
data: df$Función.física by df$Sequedad.de.boca.percibida
t = -0.57644, df = 43.328, p-value = 0.5673
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-2.45258 1.36200
sample estimates:
mean in group no mean in group si
16.91304 17.45833
#t.test sequedad de boca -psicosocial
t.test(df$Función.psicosocial~df$Sequedad.de.boca.percibida)
Welch Two Sample t-test
data: df$Función.psicosocial by df$Sequedad.de.boca.percibida
t = 0.89935, df = 44.806, p-value = 0.3733
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-1.188115 3.104782
sample estimates:
mean in group no mean in group si
27.00000 26.04167
#t.test sequedad de boca -dolor y malestar
t.test(df$Dolor.y.malestar~df$Sequedad.de.boca.percibida)
Welch Two Sample t-test
data: df$Dolor.y.malestar by df$Sequedad.de.boca.percibida
t = 0.10305, df = 44.34, p-value = 0.9184
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-1.109187 1.228752
sample estimates:
mean in group no mean in group si
8.434783 8.375000
#t.test sequedad de boca -total
t.test(df$TOTAL.GOHAI~df$Sequedad.de.boca.percibida)
Welch Two Sample t-test
data: df$TOTAL.GOHAI by df$Sequedad.de.boca.percibida
t = 0.2332, df = 44.392, p-value = 0.8167
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
-3.612393 4.558046
sample estimates:
mean in group no mean in group si
52.34783 51.87500