library(covr)
library(testthat)
dw <- read.csv("../jdcbill_test_dw.csv", stringsAsFactors = FALSE)
dw$date <- lubridate::mdy(dw$date)
proj <- read.csv("../jdcbill_projects.csv", stringsAsFactors = FALSE)
prior.dw.usage <- read.csv("../jdcbill_test_usage.csv", stringsAsFactors = FALSE)
prior.dw.usage$hrs.charge <- as.numeric(prior.dw.usage$hrs.charge)
prior.summary <- read.csv("../jdcbill_test_summary.csv", stringsAsFactors = FALSE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.