R/get.tau.R

get.tau <-
  function(trans=0.5, nu=0.2, kappa=14*.96, N=1000){
    beta <- beta.from.T(T=trans, nu=nu)
    alpha <- beta*kappa - nu
    log(sqrt(N))/alpha
  }

Try the epineticseq package in your browser

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

epineticseq documentation built on May 2, 2019, 4:56 p.m.