Adăugarea de cognostici personalizați
Hai să creăm niște cognostici personalizați. Pentru aceasta, vei adăuga două variabile noi în datele gapminder: delta_lifeExp și ihme_link.
Acest exercițiu face parte din cursul
Vizualizarea datelor mari cu Trelliscope în R
Instrucțiuni pentru exercițiu
- Adaugă o nouă variabilă numită
delta_lifeExpîn datele gapminder, care să calculeze diferența dintre prima și ultima speranță de viață (lifeExp) observată pentru fiecarecountry(variabila de grupare). Reține că datele sunt deja sortate după an. - Adaugă o altă variabilă,
ihme_link, care să trimită către profilul țării pe healthdata.org, folosindspace_to_dash()pentru a înlocui spațiile din valorilecountrycu cratime. De exemplu, pentru țara „Costa Rica", linkul este „http://www.healthdata.org/Costa-Rica". - Oferă variabilei
delta_lifeExpdescrierea"Overall change in life expectancy". - Specifică
default_label = TRUEpentru ca variabilaihme_linksă fie afișată ca etichetă în mod implicit.
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
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"))