compareCIResults[opts : OptionsPattern[NonlinearModelFit]] :=
TableForm[{#["ParameterConfidenceIntervalTable"] & /@ {nlm[
xyAsOffset] xyAsOffset, nlm[xyAsAbsoluteTime]opts], nlm[xyAsAbsoluteTime, opts]}},
TableHeadings -> {{opts}, {"xyAsOffsets""xAsOffsetsFromTRef", "xyAsAbsoluteTime"
"xAsAbsoluteTime"}}]];
compareCIResults[]