The internal function to calculate the objective function value of I optimal design with right censoring plan.
Iobj.rc(x, formula, coef, nf, tc, alpha, useLower, useUpper)