running every

devtools::document()
devtools::load_all()

if i update csv of motivate_me

quotes <- read.csv("quotes.csv", stringsAsFactors = FALSE)
usethis::use_data(quotes, internal = FALSE, overwrite = TRUE)