# setwd("S:/R-MNHS-SPHPM-EPM-IDEpi/RISE/4. Surveys/3. Objectives/1. FJ/3/20190624_baseline/3. Data/2. code") setwd("Z:/R Script/R Script Obj 3") library (tidyverse) library (lubridate) knitr::opts_chunk$set(echo = TRUE, warning=FALSE) #this stops warnings from displaying in html source("O3_T0_FJ-dailyqc.R")
r day.qc
The community(ies) visited today were: r settlement.list
There were a total of r nrow (subhouse)
house surveys initiated today, r nrow (house.complete)
were completed and r nrow (house.incomplete)
schedule for revisits. The average time to complete the house survey was r round(time_house_avg, digits = 1)
minutes (min = r round(time_house_min, digits = 1)
, max = r round(time_house_max, digits = 1)
).
There were a total of r nrow (subhhd)
household surveys initiated today, and r nrow (hhd.complete)
were completed.The average time to complete the house survey was r round(time_hhd_avg, digits = 1)
minutes (min = r round(time_hhd_min, digits = 1)
, max = r round(time_hhd_max, digits = 1)
).
Today there were r nrow (cfw_hhd_count)
field workers conducting surveys. On average, field workers completed r round(cfw_house_count_avg, digits = 0)
house surveys (min=r cfw_house_count_min
, max=r cfw_house_count_max
) and r round(cfw_hhd_count_avg, digits = 0)
household surveys (min=r cfw_hhd_count_min
, max=r cfw_hhd_count_max
) today.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.