Demografik trendde göreli değişim

Son egzersizde, zaman içinde demografiler arasında borçlanmadaki değişimlere baktın. Bu egzersizde ise demografik trenddeki göreli değişime bakacaksın. Bunu yapmak için, her grubun trendini ilk yıl olan 2008'deki borçlanmaya göre normalize edeceksin.

Bu egzersiz, kursun bir parçasıdır

R'de Ölçeklenebilir Veri İşleme

Kursa Göz Atın

Egzersiz talimatları

rydf'nin ilk sütununu column1 olarak al.
Sütunlar üzerinde 1:8 aralığında döngü kur ve her sütunu ilk sütuna bölerek normalize et.
x ekseninde Year, y ekseninde Proportion olacak şekilde, Race değişkenine göre renklendirip gruplandırarak çiz.

Uygulamalı etkileşimli egzersiz

Bu egzersizi bu örnek kodu tamamlayarak deneyin.

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

Kodu Düzenle ve Çalıştır