R/diffr.tot.r

Defines functions diffr.ppn diffr.tot

#' @export
diffr.tot<-function(dat)
{
  diffr(dat)*dat$N
}

diffr.ppn<-function(dat,cond)
{
  dat$y.value<-eval(parse(text=paste("dat$y.value",cond,sep="")))*1
  diffr(dat)
}
david-borchers/sampling documentation built on Sept. 17, 2022, 7:54 a.m.