.
. Starting Step 4.1
let x2 = data 10 30 40 50 120 200 800
let y2 = data 0 2 3 5 12 15 20
.
CAPTURE EXACT33.OUT
exact 3/3 fit y2 x2 thermexp temp
fit thermexp = (a0+a1*temp+a2*temp**2+a3*temp**3)/(1+b1*temp+b2*temp**2+b3*temp**3)
END OF CAPTURE
.
x1label ^temp
y1label ^thermexp
title displacement 7
title Thermal Expansion of Copper DataCR()C/C Rational Function Model
plot thermexp pred vs temp
title displacement
title
x1label
y1label
. Finished Step 4.1: Page Back for Output