शुरू करेंमुफ़्त में शुरू करें

कस्टम cognostics जोड़ना

आइए कुछ कस्टम cognostics बनाते हैं. इसके लिए, आप gapminder डेटा में दो नए वैरिएबल जोड़ेंगे: delta_lifeExp और ihme_link.

यह अभ्यास पाठ्यक्रम का हिस्सा है

R में Trelliscope के साथ बिग डेटा का विज़ुअलाइज़ेशन

पाठ्यक्रम देखें

अभ्यास निर्देश

  • gapminder डेटा में delta_lifeExp नाम का एक नया वैरिएबल जोड़ें, जो हर country (grouping वैरिएबल) के लिए life expectancy (lifeExp) के पहले और आखिरी देखे गए मानों का अंतर compute करे. ध्यान दें कि डेटा पहले से year के अनुसार sort किया हुआ है.
  • एक और वैरिएबल ihme_link जोड़ें, जो healthdata.org पर उस country की प्रोफ़ाइल से लिंक करे. country के मानों में spaces को dashes में बदलने के लिए space_to_dash() का उपयोग करें. उदाहरण के लिए, "Costa Rica" के लिए लिंक होगा "http://www.healthdata.org/Costa-Rica".
  • delta_lifeExp वैरिएबल को यह विवरण दें: "Overall change in life expectancy".
  • ihme_link वैरिएबल को डिफॉल्ट रूप से लेबल के तौर पर दिखाने के लिए default_label = TRUE निर्दिष्ट करें.

इंटरैक्टिव व्यावहारिक अभ्यास

इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।

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"))
कोड संपादित करें और चलाएँ