knitr::opts_chunk$set( echo = TRUE, message = FALSE, warning = FALSE, eval = TRUE )
The goal of meetr
was for me to have fun is to facilite the coordination of agendas between people who want to setup a meeting, but live in different timezones.
devtools::install_github('artichaud1/meetr')
User 1:
library(meetr) library(fileio) library(magrittr) agenda1 <- this_week_and_next(1) %>% available( monday('9:00 to 12:00', '16:00 to 17:00') + thursday('14:00 to 17:00') + friday() ) # NOT RUN # link <- fi_post_rdata(agenda1)$link # Sends link to User2
User 2:
agenda2 <- this_week() %>% available( week_days('11:00 to 12:00') - friday() ) + next_week() %>% available( week_days('13:00 to 17:00') ) # NOT RUN # meet(readRDS(url(link)), agenda2, '01:00') # Get earliest agreeable time for a 1 hour meeting meet(agenda1, agenda2, '01:00')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.