knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
library(FacebookMessageTimes)
data <- load_facebook_message_data("../data-raw/messages_censored1.json")

tobin_times <- FacebookMessageTimes::get_person_message_times(data, "Tobin South")

date_times <- get_datetime(tobin_times)
plot_over_time(date_times)
plot_time_of_day(date_times)


tobinsouth/FacebookMessageTimes documentation built on June 22, 2019, 12:46 a.m.