Rasa și etnia împrumutaților pe an (II)

În acest exercițiu, vei folosi atât iotools, cât și bigtabulate pentru a tabula rasa și etnia împrumutaților pe an.

Acest exercițiu face parte din cursul

Procesarea scalabilă a datelor în R

Vezi cursul

Instrucțiuni pentru exercițiu

iotools și bigtabulate sunt încărcate în spațiul tău de lucru.

Creează o funcție make_table() care citește un fragment ca matrice și îl tabulează după rasa împrumutaților și an.
Folosește chunk.apply() pentru a importa datele din conexiunea la fișier pe care am creat-o pentru tine.
Convertește race_year_table la un data frame.

Exercițiu interactiv practic

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

# Open a connection to the file and skip the header
fc <- file("mortgage-sample.csv", "rb")
readLines(fc, n = 1)

# Create a function to read chunks
make_table <- function(chunk) {
    # Create a matrix
    m <- ___(chunk, sep = ",", type = "integer")
    colnames(m) <- mort_names
    # Create the output table
    ___(m, c("borrower_race", "year"))
}

# Import data using chunk.apply
race_year_table <- ___(fc, make_table)

# Close connection
close(fc)

# Cast it to a data frame
rydf <- ___(race_year_table)

# Create a new column Race with race/ethnicity
rydf$Race <- race_cat

Editează și rulează codul