Compararea rasei/etniei împrumutaților și a proporțiilor acestora

În acest exercițiu, vei compara proporțiile rasiale și etnice din SUA cu proporția totală a împrumutaților în funcție de rasă sau etnie. Aceasta va oferi o verificare inițială pentru a vedea dacă fiecare grup împrumută la o rată comparabilă cu reprezentarea sa proporțională în Statele Unite. Sarcina este similară cu exercițiul anterior, însă de această dată vei folosi iotools pentru a o rezolva.

Acest exercițiu face parte din cursul

Procesarea scalabilă a datelor în R

Vezi cursul

Instrucțiuni pentru exercițiu

Creează o matrice din fiecare fragment al fișierului "mortgage-sample.csv".
Adună rândurile pentru toate coloanele din race_table_chunks.

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

# 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]))

Editează și rulează codul