Aan de slagGa gratis aan de slag

Samenvoegen met rbind()

Nu je de structuur en reikwijdte van je temperatuurdata kent, is je volgende taak om deze objecten om te zetten naar xts en ze samen te voegen met rbind().

Voordat je een object naar xts kunt omzetten, moet je bepalen welke kolom de tijdindex wordt en controleren dat deze als een tijdgebaseerd object is gecodeerd. In dit geval wil je de klasse van de date-kolom in temps_1 en temps_2 controleren. Zodra je de juiste tijdindex hebt vastgesteld, kun je beide objecten naar xts coderen en per rij samenvoegen.

De objecten temps_1 en temps_2 zijn beschikbaar in je werkruimte en het pakket xts is voor je geladen.

Deze oefening maakt deel uit van de cursus

Casestudy: Tijdreeksgegevens van een stad analyseren in R

Cursus bekijken

Oefeninstructies

  • Gebruik twee aanroepen van class() om te controleren dat de date-kolommen in temps_1 en temps_2 als tijdgebaseerde objecten zijn gecodeerd (Date, POSIXct, POSIXlt, yearmon, etc.).
  • Gebruik as.xts() om elk van je temperatuurdataframes (temps_1 en temps_2) om te zetten naar een apart xts-object. Geef daarbij de relevante tijdkolom op voor het order.by-argument. Vergeet ook niet de tijdkolom te verwijderen met de notatie data[, -column].
  • Gebruik twee aanroepen van head() om te bevestigen dat je nieuwe xts-objecten correct zijn opgemaakt.
  • Gebruik rbind() op je xts-objecten om ze samen te voegen tot één object: temps_xts.
  • Gebruik een combinatie van first() en last() om gegevens te selecteren van de eerste 3 dagen van de laatste maand van het eerste jaar in temps_xts.

Praktische interactieve oefening

Probeer deze oefening eens door deze voorbeeldcode in te vullen.

# Confirm that the date column in each object is a time-based class
class(___)
class(___)

# Encode your two temperature data frames as xts objects
temps_1_xts <- as.xts(___[, -4], order.by = ___)
temps_2_xts <- ___

# View the first few lines of each new xts object to confirm they are properly formatted
head(___)
head(___)

# Use rbind to merge your new xts objects
temps_xts <- ___

# View data for the first 3 days of the last month of the first year in temps_xts
___(___(first(___, "1 year"), "1 month"), "___")
Code bewerken en uitvoeren