# NOT RUN {
# A single key for pedestrian data ----
key(pedestrian)
key_vars(pedestrian)
# Nested and crossed keys for tourism data ----
key(tourism)
key_vars(tourism)
# unkey() only works for a tsibble with 1 key size ----
sx <- pedestrian %>%
filter(Sensor == "Southern Cross Station")
unkey(sx)
# }
Run the code above in your browser using DataLab