Comparer la race/l’ethnicité des emprunteurs et leurs proportions
Dans cet exercice, vous allez comparer les proportions raciales et ethniques aux États-Unis avec la proportion du total des emprunteurs par race ou ethnicité. Cela fournit une première vérification pour voir si chaque groupe emprunte à un rythme comparable à sa représentation proportionnelle aux États-Unis. La tâche est similaire au précédent exercice, mais cette fois vous utiliserez iotools pour y parvenir.
Cet exercice fait partie du cours
Traitement de données à grande échelle en R
Instructions
- Créez une matrice à partir de chaque bloc de
"mortgage-sample.csv". - Additionnez les lignes pour toutes les colonnes de
race_table_chunks.
Exercice interactif pratique
Essayez cet exercice en complétant cet exemple de code.
# Create table of the borrower_race
race_table_chunks <- ___(
"mortgage-sample.csv", function(chunk) {
x <- ___(chunk, sep = ",", type = "integer")
colnames(x) <- mort_names
table(x[, "borrower_race"])
}, CH.MAX.SIZE = 1e5)
# Add up the columns
race_table <- ___(race_table_chunks)
# Find the proportion
borrower_proportion <- race_table[1:7] / sum(race_table[1:7])
# Create the matrix
matrix(c(pop_proportion, borrower_proportion), byrow = TRUE, nrow = 2,
dimnames = list(c("Population Proportion", "Borrower Proportion"), race_cat[1:7]))