Relativ förändring i demografisk trend

I den föregående övningen studerade du hur låneaktiviteten förändrades över tid för olika demografiska grupper. I den här övningen tittar du istället på den relativa förändringen i demografisk trend. Det gör du genom att normalisera varje grupps trend med låneaktiviteten under det första året, 2008.

Den här övningen är en del av kursen

Skalbar databehandling i R

Visa kurs

Övningsinstruktioner

Hämta den första kolumnen i rydf som column1.
Loopa över kolumnerna 1:8 och normalisera dem genom att dividera varje kolumn med den första kolumnen.
Plotta Year på x-axeln och Proportion på y-axeln, färglagda och grupperade efter variabeln Race.

Interaktiv övning med praktiskt arbete

Testa den här övningen genom att slutföra den här exempelkoden.

# View rydf
rydf

# Get the first column of rydf
column1 <- rydf[, 1]

# Normalize the first 8 columns
for(this_column in 1:8) {
  rydf[, this_column] <- rydf[, ___] / ___
}

# Convert the data to long format
rydf_long <- pivot_longer(rydf, -Race, names_to = "Year", values_to = "Proportion")

# Plot
ggplot(rydf_long, aes(x = ___, y = ___, group = Race, color = Race)) + 
    geom_line()

Redigera och kör kod