# Demo with `pq_data` example where Outlook Start and End times are imputed
spq_df <- pq_data
spq_df$WorkingStartTimeSetInOutlook <- "6:30"
spq_df$WorkingEndTimeSetInOutlook <- "23:30"
# Return a message
flag_outlooktime(spq_df, threshold = c(5, 13))
# Return data
flag_outlooktime(spq_df, threshold = c(5, 13), return = "data")
Run the code above in your browser using DataLab