powered by
secavg(ab, bb, tb, h, sb, cs)
## The function is currently defined as function (ab, bb, tb, h, sb, cs) { SecA <- (bb + tb - h + sb - cs)/ab return(SecA) }
Run the code above in your browser using DataLab