Convert ical object to character strings of events
ic_char_event(ic, zulu = FALSE)
ic <- ical(ical_example)
ic_char_event(ic)
#> [1] "BEGIN:VEVENT"
#> [2] "DTSTART:20180809T160000"
#> [3] "DTEND:20180809T163000"
#> [4] "DTSTAMP:20180810T094100Z"
#> [5] "UID:1119ejg4vug5758527atjcrqj3@google.com"
#> [6] "CREATED:20180807T133712Z"
#> [7] "DESCRIPTION:\\n"
#> [8] "LAST-MODIFIED:20180807T133712Z"
#> [9] "LOCATION:"
#> [10] "SEQUENCE:0"
#> [11] "STATUS:CONFIRMED"
#> [12] "SUMMARY:ical programming mission"
#> [13] "TRANSP:OPAQUE"
#> [14] "END:VEVENT"
ic_char_event(ic[c(1, 1), ])
#> [1] "BEGIN:VEVENT"
#> [2] "DTSTART:20180809T160000"
#> [3] "DTEND:20180809T163000"
#> [4] "DTSTAMP:20180810T094100Z"
#> [5] "UID:1119ejg4vug5758527atjcrqj3@google.com"
#> [6] "CREATED:20180807T133712Z"
#> [7] "DESCRIPTION:\\n"
#> [8] "LAST-MODIFIED:20180807T133712Z"
#> [9] "LOCATION:"
#> [10] "SEQUENCE:0"
#> [11] "STATUS:CONFIRMED"
#> [12] "SUMMARY:ical programming mission"
#> [13] "TRANSP:OPAQUE"
#> [14] "END:VEVENT"
#> [15] "BEGIN:VEVENT"
#> [16] "DTSTART:20180809T160000"
#> [17] "DTEND:20180809T163000"
#> [18] "DTSTAMP:20180810T094100Z"
#> [19] "UID:1119ejg4vug5758527atjcrqj3@google.com"
#> [20] "CREATED:20180807T133712Z"
#> [21] "DESCRIPTION:\\n"
#> [22] "LAST-MODIFIED:20180807T133712Z"
#> [23] "LOCATION:"
#> [24] "SEQUENCE:0"
#> [25] "STATUS:CONFIRMED"
#> [26] "SUMMARY:ical programming mission"
#> [27] "TRANSP:OPAQUE"
#> [28] "END:VEVENT"