¡Descarga Estudio sobre tabaco, trastorno de personalidad antisocial y abstinencia - Prof. Solanas y más Apuntes en PDF de Estadística solo en Docsity!
Universitat de Barcelona Facultat de Psicolgia Dept. Metodologia de les Ciències del Comportament
UNITAT 8: PROVA DE KHI QUADRAT.
- Tenint en compte la informació que es presenta a continuació determini si existeix
relació estadísticament significativa entre el fet de presentar un trastorn de personalitat antisocial i el fet de ser fumador. Treballar amb un del 5%.
Fumador Total Sí No Trastorn de personalitat antisocial
Sí 10 2 12 No 85 125 200 Total 95 127 222
1r. Plantejament de la hipòtesi nul·la: H 0 : No hi ha relació entre el fet de partir un trastorn de personalitat antisocial i el fet de ser fumador (foij = feij). 2n. Fixar el valor de : 0. 3r. Càlcul de l’estadístic de contrast: ^2
Fumador Total Sí No Trastorn de personalitat antisocial
Sí 10 (5.14) 2 (6.86) 12 No 85 (89.86) 125 (120.14) 200 Total 95 127 222
Totes les freqüències esperades són superiors a 5, per tant es compleix la condició d’aplicació i per tant es pot obtenir el valor de l’estadístic ^2 de Pearson:
Universitat de Barcelona Facultat de Psicolgia Dept. Metodologia de les Ciències del Comportament
4t. Prendre decisió: Rebutjo H 0 amb p =. 5è. Grandària de l’efecte:
6è. Conclusions: Existeix relació estadísticament significativa entre el fet de patir un trastorn de personalitat antisocial i el fet de ser fumador, donat que el valor de khi quadrat obtingut amb les nostres dades és de 8.5167, amb 1 grau de llibertat, té associat un grau de significació de .0035, el que ens porta a rebutjar la hipòtesi nul·la. La mesura de grandària de l’efecte, indica que la relació és de baixa intensitat (0.1959).
Llistat R
.Table # Counts 1 2 1 10 2 2 85 125 .Test <- chisq.test(.Table, correct=FALSE) .Test Pearson's Chi-squared test data: .Table X-squared = 8.5167, df = 1, p-value = 0. .Test$expected # Expected Counts 1 2 1 5.135135 6. 2 89.864865 120.
remove(.Test) fisher.test(.Table) Fisher's Exact Test for Count Data data: .Table p-value = 0. alternative hypothesis: true odds ratio is not equal to 1 95 percent confidence interval: 1.500067 70. sample estimates:
odds ratio
A partir de la següent taula de contingència determini si existeix relació
estadísticament significativa entre el fet de presentar un trastorn de personalitat per dependència i mantenir-se abstinent a l’any desprès de seguir un programa per deixar de fumar. Treballar amb un del 1%.
Universitat de Barcelona Facultat de Psicolgia Dept. Metodologia de les Ciències del Comportament
Llistat R
.Table # Counts 1 2 1 3 38 2 16 64 .Test <- chisq.test(.Table, correct=FALSE) .Test Pearson's Chi-squared test data: .Table X-squared = 3.2942, df = 1, p-value = 0. .Test$expected # Expected Counts 1 2 1 6.438017 34. 2 12.561983 67.
remove(.Test) fisher.test(.Table) Fisher's Exact Test for Count Data data: .Table p-value = 0. alternative hypothesis: true odds ratio is not equal to 1 95 percent confidence interval: 0.05584284 1. sample estimates: odds ratio
Determini si existeix relació entre el tipus de trastorn de personalitat i el fet de
mantenir-se abstinent al final del tractament. Treballi amb un del 5%.
Mantenir-se abstinent (^) Total Sí No Tipus de trastorn de personalitat
T. antisocial 2 9 11 T. per dependència 11 47 58 Cap trastorn 65 22 87 Total 78 78 156
.Table # Counts 1 2 1 2 9 2 11 47 3 65 22
Universitat de Barcelona Facultat de Psicolgia Dept. Metodologia de les Ciències del Comportament
.Test <- chisq.test(.Table, correct=FALSE) .Test Pearson's Chi-squared test data: .Table X-squared = 48.0522, df = 2, p-value = 3.678e- .Test$expected # Expected Counts 1 2 1 5.5 5. 2 29.0 29. 3 43.5 43.
1r. Plantejament de la hipòtesi nul·la: H 0 : No hi ha relació entre el tipus de trastorn de personalitat i el fet de mantenir-se abstinent (foij = feij). 2n. Fixar el valor de : 0. 3r. Càlcul de l’estadístic de contrast: ^2 Com es pot veure en el llistat de R, totes les freqüències esperades són superiors a 5, per tant es compleix la condició d’aplicació i es pot interpretar el valor de l’estadístic ^2 de Pearson que es aquest cas és de 48.0522, que amb 2 graus de llibertat té un grau de significació associat de 3.678 · 10 -11. 4t. Prendre decisió: Rebutjo H 0 amb p = 3.678 · 10 - 5è. Grandària de l’efecte:
6è. Conclusions: Existeix relació estadísticament significativa entre el tipus de trastorn de personalitat i el fet de mantenir-se abstinent, donat que el valor de khi quadrat obtingut amb les nostres dades és de 48.0522, que amb 2 graus de llibertat, té associat un grau de significació de 3.678 · 10 -11, el que ens porta a rebutjar la hipòtesi nul·la. A més a més la mesura de la grandària de l’efecte, és indica que la intensitat de la relació és elevada (0.5550).
- Determini si existeix relació estadísticament significativa entre el sexe i el fet de
mantenir-se abstinent al final del tractament. Treballi amb un del 1%.
Universitat de Barcelona Facultat de Psicolgia Dept. Metodologia de les Ciències del Comportament
.Test <- chisq.test(.Table, correct=FALSE) .Test Pearson's Chi-squared test data: .Table X-squared = 0.0335, df = 1, p-value = 0. .Test$expected # Expected Counts Abstinència Sexe No Sí Dona 6.217391 6. Home 4.782609 5. remove(.Test) fisher.test(.Table) Fisher's Exact Test for Count Data data: .Table p-value = 1 alternative hypothesis: true odds ratio is not equal to 1 95 percent confidence interval: 0.1229238 5. sample estimates: odds ratio
Determini si existeix relació estadísticament significativa entre el sexe i el tipus de
tabac. Treballi amb un del 5%.
1r. Plantejament de la hipòtesi nul·la: H 0 : No hi ha relació entre el sexe i el tipus de tabac (foij = feij). 2n. Fixar el valor de : 0. 3r. Càlcul de l’estadístic de contrast: ^2 Tipus de tabac Total Negre Ros
Sexe
Dona 3 (5.65) 10 (7.35) 13 Home 7 (4.35) 3 (5.65) 10 Total 10 13 23
Com es pot veure en la taula anterior, hi ha una freqüència esperada inferior a 5, en concret és de 4.35, per tant s’ha d’obtenir la khi-quadrat aplicant la correcció de continuïtat de Yates.
Universitat de Barcelona Facultat de Psicolgia Dept. Metodologia de les Ciències del Comportament
Llistat R
pchisq(c(3.33465976), df=1, lower.tail=FALSE) [1] 0.
4t. Prendre decisió: No rebutjo H 0 amb p = 0.
5è. Conclusions:
No existeix relació estadísticament significativa entre el sexe i el tipus de tabac, donat que el valor de khi quadrat obtingut amb les nostres dades és de 3.3347, que amb 1 grau de llibertat, té associat un grau de significació de 0.0678, el que ens porta a no rebutjar la hipòtesi nul·la.
Llistat R
.Table Tipus_tabac Sexe Negre Ros Dona 3 10 Home 7 3
.Test <- chisq.test(.Table, correct=FALSE) .Test Pearson's Chi-squared test data: .Table X-squared = 5.0641, df = 1, p-value = 0.
.Test$expected # Expected Counts Tipus_tabac Sexe Negre Ros Dona 5.652174 7. Home 4.347826 5.
remove(.Test) fisher.test(.Table) Fisher's Exact Test for Count Data data: .Table p-value = 0. alternative hypothesis: true odds ratio is not equal to 1 95 percent confidence interval: 0.01332588 1. sample estimates: odds ratio
Universitat de Barcelona Facultat de Psicolgia Dept. Metodologia de les Ciències del Comportament
Llistat R
.Table Trastorn.personalitat Sexe No Sí Dona 3 10 Home 6 4
.Test <- chisq.test(.Table, correct=FALSE) .Test Pearson's Chi-squared test data: .Table X-squared = 3.2352, df = 1, p-value = 0.
.Test$expected # Expected Counts Trastorn.personalitat Sexe No Sí Dona 5.086957 7. Home 3.913043 6.
remove(.Test) fisher.test(.Table) Fisher's Exact Test for Count Data
data: .Table p-value = 0. alternative hypothesis: true odds ratio is not equal to 1 95 percent confidence interval: 0.02227658 1. sample estimates: odds ratio
Determini si existeix relació estadísticament significativa entre el fet de mantenir-se
abstinent al final del tractament i el tipus de tabac. Treballi amb un del 3%.
.Table <- xtabs(~Abstinència+Tipus_tabac, data=Dades_Pràctiques) .Table Tipus_tabac Abstinència Negre Ros No 4 7 Sí 6 6
.Test <- chisq.test(.Table, correct=FALSE) .Test Pearson's Chi-squared test data: .Table X-squared = 0.4343, df = 1, p-value = 0.
Universitat de Barcelona Facultat de Psicolgia Dept. Metodologia de les Ciències del Comportament
.Test$expected # Expected Counts Tipus_tabac Abstinència Negre Ros No 4.782609 6. Sí 5.217391 6.
remove(.Test) fisher.test(.Table) Fisher's Exact Test for Count Data data: .Table p-value = 0. alternative hypothesis: true odds ratio is not equal to 1 95 percent confidence interval: 0.07791744 3. sample estimates: odds ratio
1r. Plantejament de la hipòtesi nul·la:
H 0 : No hi ha relació entre el fet de mantenir-se abstinent i el tipus de tabac (foij = feij).
2n. Fixar el valor de : 0.
3r. Càlcul de l’estadístic de contrast: ^2
Com es pot veure en el llistat de R, hi ha una freqüència esperada inferior a 5, en concret és de 4.78, per tant s’ha d’obtenir la khi-quadrat aplicant la correcció de continuïtat de Yates.
Llistat R
pchisq(c(0.05662879), df=1, lower.tail=FALSE)
[1] 0.
4t. Prendre decisió: No rebutjo H 0 amb p = 0.
5è. Conclusions:
No existeix relació estadísticament significativa entre el fet de mantenir-se abstinent i el tipus de tabac, donat que el valor de khi quadrat obtingut amb les
Universitat de Barcelona Facultat de Psicolgia Dept. Metodologia de les Ciències del Comportament
Llistat R
pchisq(c(0.47328944), df=1, lower.tail=FALSE)
[1] 0.
4t. Prendre decisió: No rebutjo H 0 amb p = 0.
5è. Conclusions:
No existeix relació estadísticament significativa entre el fet de mantenir-se abstinent i el fet de patir un trastorn de personalitat, donat que el valor de khi quadrat obtingut amb les nostres dades és de 0.4732, que amb 1 grau de llibertat, té associat un grau de significació de 0.4915, el que ens porta a no rebutjar la hipòtesi nul·la.
