UCT.Eff.calc: Summarises the results from multiple simulations of a UCT

In obrady/SpatialDengue: Fits and simulates a spatial model of the vector-borne disease dengue

Description

Calculates Effectiveness and ttoal people treated from the outputs of multiple simulated trials

Usage

UCT.Eff.calc(denmod_UCT, unipix)

Arguments

denmod_UCT	A list of multiple SpatialDengue model objects
unipix	Universal pixel lookup table, see ?make.unipix

Details

plots a boxplot of Effectiveness against dengue infection and dengue cases and returns a data frame of the Effectiveness and total person-days of observation in the trial and total people treated with drugs for each realisation of the trial (model run)

Examples

data(sgdat)
data(sgpop)
sgpop <- pop.process(sgpop, agg = 10)
unipix <- make.unipix(sgpop)
pixdistmat <- distm(cbind(unipix$x, unipix$y))
sgdat <- data.frame(sgdat, patchID = apply(cbind(sgdat[, 3:2]), 1, pix.id.find, unipix))
weekdates <- c(40, 92)

UCTinfo <- list(Tstart = 50,
               Tfollowup = 28,
               ntreat = 30,
               ncontrol = 30,
               DrugEfficacy = 0.9)

denmod_UCT = DEN.spatial.UCT(weekdates, sgdat, unipix, pixdistmat, UCTinfo, nruns = 10)
effectiveness <- UCT.Eff.calc(denmod_UCT, unipix)

obrady/SpatialDengue documentation built on Nov. 27, 2020, 12:13 p.m.