SFO_SFO = mkinmod(parent = mkinsub("SFO", to = "m1"),
m1 = mkinsub("SFO"),
use_of_ff = "max")
fit_FOCUS_D = mkinfit(SFO_SFO, FOCUS_2006_D, quiet = TRUE)
round(mkinerrmin(fit_FOCUS_D), 4)
if (FALSE) {
fit_FOCUS_E = mkinfit(SFO_SFO, FOCUS_2006_E, quiet = TRUE)
round(mkinerrmin(fit_FOCUS_E), 4)
}
Run the code above in your browser using DataLab