R/t2Grey.R

t2Grey<-function(B0,relax=TRUE){
  if(relax){return(1.74*B0+7.77)}else{
    return(1/(1.74*B0+7.77)*1000)
  }
}

Try the FIACH package in your browser

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

FIACH documentation built on May 1, 2019, 8:02 p.m.