R/Ubeta1.fun.R

Defines functions Ubeta1.fun

Ubeta1.fun <-
function(ord.delta,ord.z,S0,S1,ord.wt){
  a = -ord.delta*(ord.z-S1/S0)*ord.wt
  b = apply(a,2,sum)
  return(b)  
}

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.