Returns a boolean describing whether a given event key is official
Examples
is_event_key_official(read_event("2016parr"))
#> Error in is_event_key_official(read_event("2016parr")): could not find function "is_event_key_official"
is_event_key_official(read_event("2016paphi"))
#> Error in is_event_key_official(read_event("2016paphi")): could not find function "is_event_key_official"