Solidaridad
solidaridad %>% filter(!is.na(Ayuda)&!is.na(Acto)&!is.na(Contexto)) %>% group_by(Contexto,Acto,Ayuda) %>% summarize(c=n()) %>%
mutate(percent = (c / sum(c))*100)## # A tibble: 8 x 5
## # Groups: Contexto, Acto [4]
## Contexto Acto Ayuda c percent
## <chr> <chr> <chr> <int> <dbl>
## 1 Barrio Entregar Alta solidaridad 1377 82.50449
## 2 Barrio Entregar Baja Solidaridad 292 17.49551
## 3 Barrio Recibir Alta solidaridad 1046 63.74162
## 4 Barrio Recibir Baja Solidaridad 595 36.25838
## 5 Calle Entregar Alta solidaridad 405 53.71353
## 6 Calle Entregar Baja Solidaridad 349 46.28647
## 7 Calle Recibir Alta solidaridad 809 49.14945
## 8 Calle Recibir Baja Solidaridad 837 50.85055solidaridad %>% filter(!is.na(Ayuda)&!is.na(Acto)&!is.na(Contexto)) %>% group_by(Contexto,Acto,Ayuda) %>% summarize(c=n()) %>%
mutate(percent = (c / sum(c))) %>% ggplot(aes(Contexto))+facet_grid(.~Acto)+labs(x="",y="",fill="") +
geom_bar(aes(y = percent,fill = Ayuda),stat="identity", position="dodge") +scale_y_continuous(labels=scales::percent)
#Recibir - Barrio
sjt.xtab(sol_1$Ayuda,db$CL16,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | CL16 REGISTRE SEXO | Total | |
|---|---|---|---|
| Hombre | Mujer | ||
| Alta solidaridad |
470 60.6 % |
535 62 % |
1005 61.3 % |
| Baja Solidaridad |
306 39.4 % |
328 38 % |
634 38.7 % |
| Total |
776 100 % |
863 100 % |
1639 100 % |
χ2=0.001 · df=1 · φ=0.002 · p=0.982 |
sjt.xtab(sol_1$Ayuda,db$EDAD,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | EDAD | Total | |||
|---|---|---|---|---|---|
| 18-29 | 30-45 | 46-60 | 60++ | ||
| Alta solidaridad |
269 58.2 % |
361 60.6 % |
220 64.3 % |
156 65 % |
1006 61.3 % |
| Baja Solidaridad |
193 41.8 % |
235 39.4 % |
122 35.7 % |
84 35 % |
634 38.7 % |
| Total |
462 100 % |
596 100 % |
342 100 % |
240 100 % |
1640 100 % |
χ2=7.796 · df=3 · Cramer’s V=0.069 · p=0.050 |
sjt.xtab(sol_1$Ayuda,db$GSE_CALCULADO,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | GSE_CALCULADO | Total | ||||
|---|---|---|---|---|---|---|
| ABC1 | C2 | C3 | D | E | ||
| Alta solidaridad |
119 69.2 % |
183 60.6 % |
287 63.4 % |
320 59.8 % |
96 54.5 % |
1005 61.4 % |
| Baja Solidaridad |
53 30.8 % |
119 39.4 % |
166 36.6 % |
215 40.2 % |
80 45.5 % |
633 38.6 % |
| Total |
172 100 % |
302 100 % |
453 100 % |
535 100 % |
176 100 % |
1638 100 % |
χ2=13.426 · df=4 · Cramer’s V=0.090 · p=0.009 |
#Entregar - Barrio
sjt.xtab(sol_2$Ayuda,db$CL16,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | CL16 REGISTRE SEXO | Total | |
|---|---|---|---|
| Hombre | Mujer | ||
| Alta solidaridad |
653 81.6 % |
707 80.8 % |
1360 81.2 % |
| Baja Solidaridad |
147 18.4 % |
168 19.2 % |
315 18.8 % |
| Total |
800 100 % |
875 100 % |
1675 100 % |
χ2=0.650 · df=1 · φ=0.021 · p=0.420 |
sjt.xtab(sol_2$Ayuda,db$EDAD,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | EDAD | Total | |||
|---|---|---|---|---|---|
| 18-29 | 30-45 | 46-60 | 60++ | ||
| Alta solidaridad |
370 78.2 % |
512 84.6 % |
288 82.5 % |
190 76.9 % |
1360 81.2 % |
| Baja Solidaridad |
103 21.8 % |
93 15.4 % |
61 17.5 % |
57 23.1 % |
314 18.8 % |
| Total |
473 100 % |
605 100 % |
349 100 % |
247 100 % |
1674 100 % |
χ2=9.557 · df=3 · Cramer’s V=0.076 · p=0.023 |
sjt.xtab(sol_2$Ayuda,db$GSE_CALCULADO,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | GSE_CALCULADO | Total | ||||
|---|---|---|---|---|---|---|
| ABC1 | C2 | C3 | D | E | ||
| Alta solidaridad |
173 92.5 % |
264 87.1 % |
380 82.4 % |
413 75.5 % |
130 73.4 % |
1360 81.2 % |
| Baja Solidaridad |
14 7.5 % |
39 12.9 % |
81 17.6 % |
134 24.5 % |
47 26.6 % |
315 18.8 % |
| Total |
187 100 % |
303 100 % |
461 100 % |
547 100 % |
177 100 % |
1675 100 % |
χ2=24.475 · df=4 · Cramer’s V=0.121 · p=0.000 |
#Recibir - Calle
sjt.xtab(sol_3$Ayuda,db$CL16,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | CL16 REGISTRE SEXO | Total | |
|---|---|---|---|
| Hombre | Mujer | ||
| Alta solidaridad |
325 40.9 % |
381 43.9 % |
706 42.5 % |
| Baja Solidaridad |
470 59.1 % |
486 56.1 % |
956 57.5 % |
| Total |
795 100 % |
867 100 % |
1662 100 % |
χ2=0.701 · df=1 · φ=0.022 · p=0.403 |
sjt.xtab(sol_3$Ayuda,db$EDAD,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | EDAD | Total | |||
|---|---|---|---|---|---|
| 18-29 | 30-45 | 46-60 | 60++ | ||
| Alta solidaridad |
167 35.2 % |
262 43.5 % |
150 43.7 % |
127 52.3 % |
706 42.5 % |
| Baja Solidaridad |
307 64.8 % |
340 56.5 % |
193 56.3 % |
116 47.7 % |
956 57.5 % |
| Total |
474 100 % |
602 100 % |
343 100 % |
243 100 % |
1662 100 % |
χ2=20.835 · df=3 · Cramer’s V=0.113 · p=0.000 |
sjt.xtab(sol_3$Ayuda,db$GSE_CALCULADO,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | GSE_CALCULADO | Total | ||||
|---|---|---|---|---|---|---|
| ABC1 | C2 | C3 | D | E | ||
| Alta solidaridad |
82 44.6 % |
100 32.5 % |
185 40.2 % |
259 48 % |
80 47.1 % |
706 42.5 % |
| Baja Solidaridad |
102 55.4 % |
208 67.5 % |
275 59.8 % |
281 52 % |
90 52.9 % |
956 57.5 % |
| Total |
184 100 % |
308 100 % |
460 100 % |
540 100 % |
170 100 % |
1662 100 % |
χ2=12.058 · df=4 · Cramer’s V=0.086 · p=0.017 |
#Entregar - Calle
sjt.xtab(sol_4$Ayuda,db$CL16,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | CL16 REGISTRE SEXO | Total | |
|---|---|---|---|
| Hombre | Mujer | ||
| Alta solidaridad |
171 57.4 % |
179 45.8 % |
350 50.8 % |
| Baja Solidaridad |
127 42.6 % |
212 54.2 % |
339 49.2 % |
| Total |
298 100 % |
391 100 % |
689 100 % |
χ2=11.538 · df=1 · φ=0.127 · p=0.001 |
sjt.xtab(sol_4$Ayuda,db$EDAD,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | EDAD | Total | |||
|---|---|---|---|---|---|
| 18-29 | 30-45 | 46-60 | 60++ | ||
| Alta solidaridad |
115 55 % |
106 46.1 % |
83 62.4 % |
46 39.3 % |
350 50.8 % |
| Baja Solidaridad |
94 45 % |
124 53.9 % |
50 37.6 % |
71 60.7 % |
339 49.2 % |
| Total |
209 100 % |
230 100 % |
133 100 % |
117 100 % |
689 100 % |
χ2=21.384 · df=3 · Cramer’s V=0.168 · p=0.000 |
sjt.xtab(sol_4$Ayuda,db$GSE_CALCULADO,show.col.prc = T,weight.by=db$PONDERADOR)| Ayuda | GSE_CALCULADO | Total | ||||
|---|---|---|---|---|---|---|
| ABC1 | C2 | C3 | D | E | ||
| Alta solidaridad |
35 64.8 % |
50 45 % |
101 56.1 % |
127 51.4 % |
37 38.5 % |
350 50.9 % |
| Baja Solidaridad |
19 35.2 % |
61 55 % |
79 43.9 % |
120 48.6 % |
59 61.5 % |
338 49.1 % |
| Total |
54 100 % |
111 100 % |
180 100 % |
247 100 % |
96 100 % |
688 100 % |
χ2=9.851 · df=4 · Cramer’s V=0.114 · p=0.043 |