Eigene Cognostics hinzufügen
Lass uns eigene Cognostics erstellen. Dazu fügst du dem Gapminder-Datensatz zwei neue Variablen hinzu: delta_lifeExp und ihme_link.
Diese Übung ist Teil des Kurses
Big Data mit Trelliscope in R visualisieren
Anleitung zur Übung
- Füge dem Gapminder-Datensatz eine neue Variable namens
delta_lifeExphinzu, die die Differenz zwischen der ersten und der letzten beobachteten Lebenserwartung (lifeExp) für jedescountry(Gruppierungsvariable) berechnet. Beachte, dass die Daten bereits nach Jahr sortiert sind. - Füge eine weitere Variable
ihme_linkhinzu, die auf das Länderprofil auf healthdata.org verweist. Verwendespace_to_dash(), um Leerzeichen incountry-Werten durch Bindestriche zu ersetzen. Für das Land „Costa Rica“ lautet der Link zum Beispiel „http://www.healthdata.org/Costa-Rica“. - Gib der Variable
delta_lifeExpdie Beschreibung"Overall change in life expectancy". - Setze
default_label = TRUE, damit die Variableihme_linkstandardmäßig als Beschriftung angezeigt wird.
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
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"))