This is designed to be a helper function for creating data frames ical lists.
ic_vector(x, pattern = "[A-Z]-?[A-Z]")
x = ical_example[18:19]
ic_vector(x)
#> STATUS SUMMARY
#> "CONFIRMED" "ical programming mission"