Özel kognostikler ekleme
Haydi bazı özel kognostikler oluşturalım. Bunu yapmak için gapminder verisine iki yeni değişken ekleyeceksin: delta_lifeExp ve ihme_link.
Bu egzersiz
R ile Trelliscope kullanarak Büyük Veriyi Görselleştirme
kursunun bir parçasıdırEgzersiz talimatları
- Gapminder verisine, her
country(gruplama değişkeni) için ilk ve son gözlenen yaşam beklentisi (lifeExp) arasındaki farkı hesaplayandelta_lifeExpadında yeni bir değişken ekle. Verinin yıl bazında zaten sıralı olduğunu unutma. - Ülkenin healthdata.org üzerindeki profil sayfasına bağlanan,
countrydeğerlerindeki boşlukları tireye çevirmek içinspace_to_dash()kullanan bir başka değişken olanihme_linkekle. Örneğin, "Costa Rica" ülkesi için bağlantı "http://www.healthdata.org/Costa-Rica" şeklindedir. delta_lifeExpdeğişkenine"Overall change in life expectancy"açıklamasını ver.ihme_linkdeğişkeninin varsayılan olarak bir etiket olarak gösterilmesi içindefault_label = TRUEbelirt.
Uygulamalı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
library(ggplot2)
library(dplyr)
library(gapminder)
library(trelliscopejs)
space_to_dash <- function(x) gsub(" ", "-", x)
# Group by country and create the two new variables
gap <- gapminder %>%
group_by(___) %>%
mutate(
delta_lifeExp = tail(___, 1) - head(___, 1),
ihme_link = paste0("http://www.healthdata.org/", space_to_dash(___)))
# Add the description
gap$delta_lifeExp <- cog(gap$delta_lifeExp, desc = "___")
# Specify the default label
gap$ihme_link <- cog(gap$ihme_link, default_label = ___)
ggplot(gap, aes(year, lifeExp)) +
geom_point() +
facet_trelliscope(~ country + continent,
name = "lifeExp_by_country",
desc = "Life expectancy vs. year.",
nrow = 1, ncol = 2,
scales = c("same", "sliced"))