Rasa a etnická příslušnost dlužníků podle roku (II)

V tomto cvičení použiješ iotools i bigtabulate k sestavení tabulky rasy a etnické příslušnosti dlužníků podle roku.

Toto cvičení je součástí kurzu

Škálovatelné zpracování dat v R

Zobrazit kurz

Pokyny k cvičení

iotools a bigtabulate jsou načteny ve tvém pracovním prostředí.

Vytvoř funkci make_table(), která načte blok dat jako matici a vytabuluje ho podle rasy dlužníka a roku.
Pomocí chunk.apply() importuj data z připojení k souboru, které jsme pro tebe vytvořili.
Převeď race_year_table na datový rámec.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

# 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

Upravit a spustit kód