Analyze phone survey data
Basic analysis of first round of IPA phone survey data.
1 Economic impact
At baseline, 21.5% households had businesses. 35.2% of those with businesses suspended their main business due to covid.
At baseline, 32.2% of household members worked in the previous 7 days. At the time of the phone survey, 24% of them did
2 Food security
- 60.6% of households ate fewer meals in the past 7 days.
- 90.5% of households received emergency food aid. (The proportion receiving food aid is about the same regardless of whether they report food insecurity.)
- Food security varies quite a bit by region.
3 Knowledge of Covid
- 99.6% know what covid is and most know at least 3 symptoms.
- 38.1% of households say they would go to a govt hospital if they fell ill with covid.
4 Cash transfers
- 24.7% of households currently receive 4P.
- Of these households, 97% receive 4P via cash card (nearly all via LandBank ATM)
## Warning: Removed 1009 rows containing non-finite values (stat_bin).
* 53.4% households would prefer cash, 31% prefer in-kind, and 15.6% have no preference.
5 Other
- 36.2% of households received non-food support. (I don’t have the answer code to determine what types of non-food items they received.)
- 52.6% of individual family members have access to Phil Health.
- 16.4% of individual family members have a bank account
- 63.2% of individual family members have a phone. Of these, 64.1% have a smartphone.
# Group by hh id and get max of phone and bank account ownership to determine whether anyone in the hh owns a phone or bank account
hh_phone_bank <- ind %>% group_by(unid) %>%
summarise_at(c("phone1", "phone2", "bank"), .funs = funs(max(., na.rm=TRUE))) %>%
ungroup()## Warning: funs() is soft deprecated as of dplyr 0.8.0
## Please use a list of either functions or lambdas:
##
## # Simple named list:
## list(mean = mean, median = median)
##
## # Auto named with `tibble::lst()`:
## tibble::lst(mean, median)
##
## # Using lambdas
## list(~ mean(., trim = .2), ~ median(., na.rm = TRUE))
## This warning is displayed once per session.## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf
## Warning in max(phone2, na.rm = TRUE): no non-missing arguments to max; returning
## -Inf# The
hh_phone_bank[,2:4][hh_phone_bank[,2:4]<0] <- NA_integer_