R/alphar.R

Defines functions alphar

alphar<-function(const, k, theta, sigma, t){
  gamma=sqrt(k^2+2*(1-const)*sigma^2)
  alphar=-k*theta*((gamma-k)*t+2*log(1-(gamma-k)*(1-exp(-gamma*t))/(2*gamma)))/sigma^2
  return(alphar)
}
veldanie/SuraStructuredNotes documentation built on March 27, 2022, 5:28 p.m.