Začněte nyníZačněte zdarma

Vytvoření datového rámce

Používat vestavěné datové sady je jen polovina zábavy – mnohem zajímavější je vytvořit si vlastní. Zbytek této kapitoly proto vychází z datasetu, který si sestavíš sám/sama. Zapni raketový pohon, protože nás čeká průzkum vesmíru!

Prvním úkolem je sestavit datový rámec popisující hlavní charakteristiky osmi planet naší sluneční soustavy. Podle tvého dobrého přítele Buzze jsou klíčové vlastnosti každé planety tyto:

  • Typ planety (zemská nebo plynný obr).
  • Průměr planety ve srovnání s průměrem Země.
  • Doba oběhu planety kolem Slunce ve srovnání se Zemí.
  • Zda má planeta prstence, nebo ne (TRUE nebo FALSE).

Po důkladném průzkumu na Wikipedii máš vše potřebné k vytvoření vektorů: name, type, diameter, rotation a rings – tyto vektory jsou už v editoru připravené. První prvek každého vektoru odpovídá prvnímu pozorování.

Dataový rámec sestavíš pomocí funkce data.frame(). Jako argumenty jí předáš výše zmíněné vektory – každý z nich se stane samostatným sloupcem. Protože všechny sloupce musí mít stejnou délku, musí mít stejnou délku i předávané vektory. Nezapomeň ale, že mohou (a pravděpodobně budou) obsahovat různé typy dat.

Toto cvičení je součástí kurzu

Introduction to R

Zobrazit kurz

Pokyny k cvičení

Pomocí funkce data.frame() vytvoř datový rámec. Předej jí jako argumenty vektory name, type, diameter, rotation a rings – v tomto pořadí. Výsledný datový rámec pojmenuj planets_df.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

# Definition of vectors
name <- c("Mercury", "Venus", "Earth", 
          "Mars", "Jupiter", "Saturn", 
          "Uranus", "Neptune")
type <- c("Terrestrial planet", 
          "Terrestrial planet", 
          "Terrestrial planet", 
          "Terrestrial planet", "Gas giant", 
          "Gas giant", "Gas giant", "Gas giant")
diameter <- c(0.382, 0.949, 1, 0.532, 
              11.209, 9.449, 4.007, 3.883)
rotation <- c(58.64, -243.02, 1, 1.03, 
              0.41, 0.43, -0.72, 0.67)
rings <- c(FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE)

# Create a data frame from the vectors
planets_df <-
Upravit a spustit kód