Comece agoraComece grátis

Adicionando cognostics personalizados

Vamos criar alguns cognostics personalizados. Para isso, você vai adicionar duas novas variáveis aos dados do gapminder: delta_lifeExp e ihme_link.

Este exercicio faz parte do curso

Visualizando Big Data com Trelliscope em R

Ver curso

Instruções do exercicio

  • Adicione uma nova variável chamada delta_lifeExp aos dados do gapminder que calcule a diferença entre a primeira e a última expectativa de vida observadas (lifeExp) para cada country (variável de agrupamento). Note que os dados já estão ordenados por ano.
  • Adicione outra variável, ihme_link, que cria um link para o perfil do país em healthdata.org, usando space_to_dash() para substituir espaços nos valores de country por hifens. Por exemplo, para o país "Costa Rica", o link é "http://www.healthdata.org/Costa-Rica".
  • Dê à variável delta_lifeExp a descrição "Overall change in life expectancy".
  • Especifique default_label = TRUE para fazer com que a variável ihme_link seja exibida como rótulo por padrão.

exercicio interativo prático

Tente este exercicio completando este código de exemplo.

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"))
Editar e Executar Código