R/monot.R

Defines functions monot

monot <-
function(aa){ while(sum(diff(c(-Inf,aa))<0)>0) aa[diff(c(-Inf,aa))<0]<-aa[which(diff(c(0,aa))<0)-1];return(aa)}

Try the TransModel package in your browser

Any scripts or data that you put into this service are public.

TransModel documentation built on Feb. 3, 2022, 5:08 p.m.