In[432]:= nPoints = 7;
data = Table[{Subscript[x, i], Subscript[y, i]}, {i, nPoints}];
errors = Table[{Subscript[dx, i], Subscript[dy, i]}, {i, nPoints}];
model[a_, b_, x_] = a x + b;
(*The least-squares functional;can be different,i.e.actual distance \
to the line*)
objFun[a_, b_, data_] :=
Total[(#[[2]] - model[a, b, #[[1]]])^2 & /@ data]
(*The usual solution*)
solab = First@
Solve[{D[objFun[a, b, data], a] == 0,
D[objFun[a, b, data], b] == 0}, {a, b}];
(*The squared deltas relative to the input data*)
deltaa = Flatten@{D[a /. solab, #]^2 & /@ data[[All, 1]],
D[a /. solab, #]^2 & /@ data[[All, 2]]};
deltab = Flatten@{D[b /. solab, #]^2 & /@ data[[All, 1]],
D[b /. solab, #]^2 & /@ data[[All, 2]]};
(*The error is the sum of delta times uncertainty,assuming \
independence*)
errora = Sqrt[Dot[deltaa, Flatten[errors]^2]];
errorb = Sqrt[Dot[deltab, Flatten[errors]^2]];
ndata = {{2.04, 1.9975}, {3.06, 3.2160}, {4.08, 4.0939}, {5.10,
4.9878}, {6.12, 6.4685}, {7.14, 7.2003}, {8.16, 8.2944}}
nerrors = {{0.02, 0.1696}, {0.03, 0.1793}, {0.04, 0.1821}, {0.05,
0.2568}, {0.06, 0.4197}, {0.07, 0.1342}, {0.08, 0.2304}}
nmodel[x_] =
model[a, b,
x] /. (solab /. Thread[Rule[Flatten[data], Flatten[ndata]]])
nsolab = solab /. Thread[Rule[Flatten[data], Flatten[ndata]]]
nerrorab = {errora, errorb} //.
Join[Thread[Rule[Flatten[data], Flatten[ndata]]],
Thread[Rule[Flatten[errors], Flatten[nerrors]]]]
Needs["ErrorBarPlots`"]
Show[Plot[{model[(a /. nsolab) - nerrorab[[1]], (b /. nsolab) -
nerrorab[[2]], x],
model[(a /. nsolab) - nerrorab[[1]], (b /. nsolab) + nerrorab[[2]],
x], model[(a /. nsolab) + nerrorab[[1]], (b /. nsolab) -
nerrorab[[2]], x],
model[(a /. nsolab) + nerrorab[[1]], (b /. nsolab) + nerrorab[[2]],
x], nmodel[x]}, {x, -2, 2},
PlotStyle -> {Dashed, Dashed, Dotted, Dotted, Red},
PlotRange -> All],
ErrorListPlot[Transpose[{ndata, ErrorBar @@@ nerrors}]]]
During evaluation of In[432]:= LinearModelFit::notdata: The first argument is not a vector, matrix, or a list containing a design matrix and response vector. >>
During evaluation of In[432]:= Set::write: Tag LinearModelFit in LinearModelFit[{{{2.04,0.02},{1.9975,0.1696}},{{3.06,0.03},{3.216,0.1793}},{{4.08,0.04},{4.0939,0.1821}}},x,x][a_,b_,x_] is Protected. >>
During evaluation of In[432]:= Solve::inex: Solve was unable to solve the system with inexact coefficients or the system obtained by direct rationalization of inexact numbers present in the system. Since many of the methods used by Solve require exact input, providing Solve with an exact version of the system may help. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 1]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 1]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 2]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 2]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 3]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 3]]-2 (Subscript[{{<<2>>},<<3>>,{<<2>>}}, 4]-<<1>>[a,b,Subscript[<<2>>]]) (LinearModelFit[<<1>>]^(1,0,0))[a,b,Subscript[x, 4]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 5]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 5]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 6]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 6]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 7]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 7]]==0,<<1>>==0} is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 1]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 1]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 2]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 2]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 3]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 3]]-2 (Subscript[{{<<2>>},<<3>>,{<<2>>}}, 4]-<<1>>[a,b,Subscript[<<2>>]]) (LinearModelFit[<<1>>]^(1,0,0))[a,b,Subscript[x, 4]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 5]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 5]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 6]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 6]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 7]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 7]]==0,<<1>>==0} is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 1]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 1]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 2]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 2]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 3]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 3]]-2 (Subscript[{{<<2>>},<<3>>,{<<2>>}}, 4]-<<1>>[a,b,Subscript[<<2>>]]) (LinearModelFit[<<1>>]^(1,0,0))[a,b,Subscript[x, 4]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 5]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 5]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 6]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 6]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 7]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 7]]==0,<<1>>==0} is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= General::stop: Further output of ReplaceAll::reps will be suppressed during this calculation. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 1]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 1]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 2]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 2]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 3]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 3]]-2 (Subscript[{{<<2>>},<<3>>,{<<2>>}}, 4]-<<1>>[a,b,Subscript[<<2>>]]) (LinearModelFit[<<1>>]^(1,0,0))[a,b,Subscript[x, 4]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 5]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 5]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 6]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 6]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 7]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 7]]==0,<<1>>==0} is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 1]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 1]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 2]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 2]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 3]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 3]]-2 (Subscript[{{<<2>>},<<3>>,{<<2>>}}, 4]-<<1>>[a,b,Subscript[<<2>>]]) (LinearModelFit[<<1>>]^(1,0,0))[a,b,Subscript[x, 4]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 5]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 5]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 6]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 6]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 7]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 7]]==0,<<1>>==0} is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 1]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 1]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 2]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 2]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 3]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 3]]-2 (Subscript[{{<<2>>},<<3>>,{<<2>>}}, 4]-<<1>>[a,b,Subscript[<<2>>]]) (LinearModelFit[<<1>>]^(1,0,0))[a,b,Subscript[x, 4]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 5]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 5]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 6]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 6]]-2 (Subscript[{{<<2>>},{<<2>>},{<<2>>},{<<2>>},{<<2>>}}, 7]-LinearModelFit[{<<3>>},x,x][a,b,Subscript[<<2>>]]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,Subscript[x, 7]]==0,<<1>>==0} is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= General::stop: Further output of ReplaceAll::reps will be suppressed during this calculation. >>
Out[442]= {{2.04, 1.9975}, {3.06, 3.216}, {4.08, 4.0939}, {5.1,
4.9878}, {6.12, 6.4685}, {7.14, 7.2003}, {8.16, 8.2944}}
Out[443]= {{0.02, 0.1696}, {0.03, 0.1793}, {0.04, 0.1821}, {0.05,
0.2568}, {0.06, 0.4197}, {0.07, 0.1342}, {0.08, 0.2304}}
During evaluation of In[432]:= ReplaceAll::reps: {-2 (1.9975 -LinearModelFit[{<<3>>},x,x][a,b,2.04]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,2.04]-2 (3.216 -LinearModelFit[{<<3>>},x,x][a,b,3.06]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,3.06]-2 (4.0939 -LinearModelFit[{<<3>>},x,x][a,b,4.08]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,4.08]-2 (4.9878 -LinearModelFit[{<<3>>},x,x][a,b,5.1]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,5.1]-2 (6.4685 -LinearModelFit[{<<3>>},x,x][a,b,6.12]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,6.12]-2 (7.2003 -LinearModelFit[{<<3>>},x,x][a,b,7.14]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,7.14]-2 (8.2944 -LinearModelFit[{<<3>>},x,x][a,b,8.16]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,8.16]==0,<<1>>==0}
is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
Out[444]=
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}}, x,
x][a, b,
x] /. {-2 (1.9975 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 2.04])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 2.04] -
2 (3.216 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 3.06])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 3.06] -
2 (4.0939 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 4.08])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 4.08] -
2 (4.9878 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 5.1])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 5.1] -
2 (6.4685 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 6.12])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 6.12] -
2 (7.2003 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 7.14])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 7.14] -
2 (8.2944 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 8.16])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 8.16] ==
0, -2 (1.9975 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 2.04])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 2.04] -
2 (3.216 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 3.06])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 3.06] -
2 (4.0939 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 4.08])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 4.08] -
2 (4.9878 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 5.1])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 5.1] -
2 (6.4685 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 6.12])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 6.12] -
2 (7.2003 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 7.14])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 7.14] -
2 (8.2944 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939,
0.1821}}}, x, x][a, b, 8.16])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 8.16] == 0}
Out[445]= {-2 (1.9975 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 2.04])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 2.04] -
2 (3.216 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 3.06])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 3.06] -
2 (4.0939 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 4.08])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 4.08] -
2 (4.9878 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 5.1])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 5.1] -
2 (6.4685 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 6.12])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 6.12] -
2 (7.2003 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 7.14])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 7.14] -
2 (8.2944 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 8.16])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"1", ",", "0", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 8.16] ==
0, -2 (1.9975 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 2.04])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 2.04] -
2 (3.216 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 3.06])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 3.06] -
2 (4.0939 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 4.08])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 4.08] -
2 (4.9878 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 5.1])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 5.1] -
2 (6.4685 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 6.12])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 6.12] -
2 (7.2003 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 7.14])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 7.14] -
2 (8.2944 -
LinearModelFit[{{{2.04, 0.02}, {1.9975, 0.1696}}, {{3.06,
0.03}, {3.216, 0.1793}}, {{4.08, 0.04}, {4.0939, 0.1821}}},
x, x][a, b, 8.16])
\!\(\*SuperscriptBox[\(LinearModelFit[{{{2.04`, 0.02`}, {1.9975`,
0.1696`}}, {{3.06`, 0.03`}, {3.216`, 0.1793`}}, {{4.08`,
0.04`}, {4.0939`, 0.1821`}}}, x, x]\), \*
TagBox[
RowBox[{"(",
RowBox[{"0", ",", "1", ",", "0"}], ")"}],
Derivative],
MultilineFunction->None]\)[a, b, 8.16] == 0}
During evaluation of In[432]:= ReplaceAll::reps: {-2 (1.9975 -LinearModelFit[{<<3>>},x,x][a,b,2.04]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,2.04]-2 (3.216 -LinearModelFit[{<<3>>},x,x][a,b,3.06]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,3.06]-2 (4.0939 -LinearModelFit[{<<3>>},x,x][a,b,4.08]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,4.08]-2 (4.9878 -LinearModelFit[{<<3>>},x,x][a,b,5.1]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,5.1]-2 (6.4685 -LinearModelFit[{<<3>>},x,x][a,b,6.12]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,6.12]-2 (7.2003 -LinearModelFit[{<<3>>},x,x][a,b,7.14]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,7.14]-2 (8.2944 -LinearModelFit[{<<3>>},x,x][a,b,8.16]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,8.16]==0,<<1>>==0}
is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= General::ivar: 2.04` is not a valid variable. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (1.9975 -LinearModelFit[{<<3>>},x,x][a,b,2.04]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,2.04]-2 (3.216 -LinearModelFit[{<<3>>},x,x][a,b,3.06]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,3.06]-2 (4.0939 -LinearModelFit[{<<3>>},x,x][a,b,4.08]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,4.08]-2 (4.9878 -LinearModelFit[{<<3>>},x,x][a,b,5.1]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,5.1]-2 (6.4685 -LinearModelFit[{<<3>>},x,x][a,b,6.12]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,6.12]-2 (7.2003 -LinearModelFit[{<<3>>},x,x][a,b,7.14]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,7.14]-2 (8.2944 -LinearModelFit[{<<3>>},x,x][a,b,8.16]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,8.16]==0,<<1>>==0}
is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= General::ivar: 4.08` is not a valid variable. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (1.9975 -LinearModelFit[{<<3>>},x,x][a,b,2.04]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,2.04]-2 (3.216 -LinearModelFit[{<<3>>},x,x][a,b,3.06]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,3.06]-2 (4.0939 -LinearModelFit[{<<3>>},x,x][a,b,4.08]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,4.08]-2 (4.9878 -LinearModelFit[{<<3>>},x,x][a,b,5.1]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,5.1]-2 (6.4685 -LinearModelFit[{<<3>>},x,x][a,b,6.12]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,6.12]-2 (7.2003 -LinearModelFit[{<<3>>},x,x][a,b,7.14]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,7.14]-2 (8.2944 -LinearModelFit[{<<3>>},x,x][a,b,8.16]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},x,x]^(1,0,0))[a,b,8.16]==0,<<1>>==0}
is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= General::stop: Further output of ReplaceAll::reps will be suppressed during this calculation. >>
During evaluation of In[432]:= General::ivar: 6.12` is not a valid variable. >>
During evaluation of In[432]:= General::stop: Further output of General::ivar will be suppressed during this calculation. >>
Out[446]= Out[446]
During evaluation of In[432]:= LinearModelFit::notdata: The first argument is not a vector, matrix, or a list containing a design matrix and response vector. >>
During evaluation of In[432]:= LinearModelFit::notdata: The first argument is not a vector, matrix, or a list containing a design matrix and response vector. >>
During evaluation of In[432]:= LinearModelFit::notdata: The first argument is not a vector, matrix, or a list containing a design matrix and response vector. >>
During evaluation of In[432]:= General::stop: Further output of LinearModelFit::notdata will be suppressed during this calculation. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (1.9975 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,2.04]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,2.04]-2 (3.216 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,3.06]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,3.06]-2 (4.0939 -<<1>>) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,4.08]-2 (<<1>>) <<1>>-2 (6.4685 -<<1>>) (LinearModelFit[<<1>>]^(1,0,0))[a,b,6.12]-2 (7.2003 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,7.14]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,7.14]-2 (8.2944 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,8.16]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,8.16]==0,<<1>>}
is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (1.9975 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,2.04]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,2.04]-2 (3.216 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,3.06]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,3.06]-2 (4.0939 -<<1>>) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,4.08]-2 (<<1>>) <<1>>-2 (6.4685 -<<1>>) (LinearModelFit[<<1>>]^(1,0,0))[a,b,6.12]-2 (7.2003 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,7.14]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,7.14]-2 (8.2944 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,8.16]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,8.16]==0,<<1>>}
is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= General::ivar: 1.9975` is not a valid variable. >>
During evaluation of In[432]:= ReplaceAll::reps: {-2 (1.9975 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,2.04]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,2.04]-2 (3.216 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,3.06]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,3.06]-2 (4.0939 -<<1>>) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,4.08]-2 (<<1>>) <<1>>-2 (6.4685 -<<1>>) (LinearModelFit[<<1>>]^(1,0,0))[a,b,6.12]-2 (7.2003 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,7.14]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,7.14]-2 (8.2944 -LinearModelFit[{<<3>>},-1.99992,-1.99992][a,b,8.16]) (LinearModelFit[{{<<2>>},{<<2>>},{<<2>>}},-1.99992,-1.99992]^(1,0,0))[a,b,8.16]==0,<<1>>}
is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing. >>
During evaluation of In[432]:= General::stop: Further output of ReplaceAll::reps will be suppressed during this calculation. >>
During evaluation of In[432]:= General::ivar: 2.04` is not a valid variable. >>
During evaluation of In[432]:= General::ivar: 3.06` is not a valid variable. >>
During evaluation of In[432]:= General::stop: Further output of General::ivar will be suppressed during this calculation. >>
Out[448]= \!\(\*
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJxTTMoPSmViYGD4BcQgWs9e7NX////3M0BB+fmW3PR9/+D8K1e4Xx1M/Avn
yx7IFzGX+QPnb80+wsp/9xecn9Bj+OFm0084/8ek6o799j/g/MV89yRnPPwG
58/xMiy63PkVzm/KSazQ9PwC51czryovevsJzk9sOK9ybcVHOH/q3qcz5mR9
gPN33dfgWaP0Ds5XFnBwCpn3Gs7fpNWR9ejxCzj//tGNCmZmz+D8pzpTjfZv
ewznC9atNNNjfAjn65i911n6+Q6c3+zy9sLOiutwvmjIugmR4pcQ9n07yn9C
5RScv/T2096XLfvg/NhAmS23k5fA+Tu5qq8eKl1sD+ObPmKUa4zYD+crf9j9
0+rQSTjfc/HNs34Rl+B8V18h5q9br8P5/fHXGwy234Hzj/vJ8gYIPYTz3yqK
1l2a9RjOLy3RTuwXewbnX78jEJR24gWcn1Bp85zd5zWcf1jbvOsw6zs4X41z
z4slHh/gfNk92a6sHR/hfIZfTCuLHn2C878H7o07qvoFzr9tEi+t2vIVzi8I
FxBUuvMNzpec8iSCRfYHnL8uesHyzxU/4fxw23qPE3t/wfkb43KVrP78hvN/
cDkz7wz9C+cHXbQ2k53xD86H5gd0/mj+gILR/DGaP0bzx2j+gPFH88do/hjN
H6P5A8YfzR+j+WM0f1AvfwAAfpgrew==
"], {}], {{},
{Hue[0.67, 0.6, 0.6],
PointBox[{{2.04, 1.9975}, {3.06, 3.216}, {4.08, 4.0939}, {5.1,
4.9878}, {6.12, 6.4685}, {7.14, 7.2003}, {8.16,
8.2944}}], {{LineBox[{{2.06, 1.9975}, {2.02, 1.9975}}],
LineBox[{
Offset[{0, 1.5}, {2.06, 1.9975}],
Offset[{0, -1.5}, {2.06, 1.9975}]}],
LineBox[{
Offset[{0, 1.5}, {2.02, 1.9975}],
Offset[{0, -1.5}, {2.02, 1.9975}]}],
LineBox[{{2.04, 2.1671}, {2.04, 1.8279}}],
LineBox[{
Offset[{1.5, 0}, {2.04, 2.1671}],
Offset[{-1.5, 0}, {2.04, 2.1671}]}],
LineBox[{
Offset[{1.5, 0}, {2.04, 1.8279}],
Offset[{-1.5, 0}, {2.04, 1.8279}]}]}, {
LineBox[{{3.09, 3.216}, {3.0300000000000002`, 3.216}}],
LineBox[{
Offset[{0, 1.5}, {3.09, 3.216}],
Offset[{0, -1.5}, {3.09, 3.216}]}],
LineBox[{
Offset[{0, 1.5}, {3.0300000000000002`, 3.216}],
Offset[{0, -1.5}, {3.0300000000000002`, 3.216}]}],
LineBox[{{3.06, 3.3953}, {3.06, 3.0367}}],
LineBox[{
Offset[{1.5, 0}, {3.06, 3.3953}],
Offset[{-1.5, 0}, {3.06, 3.3953}]}],
LineBox[{
Offset[{1.5, 0}, {3.06, 3.0367}],
Offset[{-1.5, 0}, {3.06, 3.0367}]}]}, {
LineBox[{{4.12, 4.0939}, {4.04, 4.0939}}],
LineBox[{
Offset[{0, 1.5}, {4.12, 4.0939}],
Offset[{0, -1.5}, {4.12, 4.0939}]}],
LineBox[{
Offset[{0, 1.5}, {4.04, 4.0939}],
Offset[{0, -1.5}, {4.04, 4.0939}]}],
LineBox[{{4.08, 4.276}, {4.08, 3.9117999999999995`}}],
LineBox[{
Offset[{1.5, 0}, {4.08, 4.276}],
Offset[{-1.5, 0}, {4.08, 4.276}]}],
LineBox[{
Offset[{1.5, 0}, {4.08, 3.9117999999999995`}],
Offset[{-1.5, 0}, {4.08, 3.9117999999999995`}]}]}, {
LineBox[{{5.1499999999999995`, 4.9878}, {5.05, 4.9878}}],
LineBox[{
Offset[{0, 1.5}, {5.1499999999999995`, 4.9878}],
Offset[{0, -1.5}, {5.1499999999999995`, 4.9878}]}],
LineBox[{
Offset[{0, 1.5}, {5.05, 4.9878}],
Offset[{0, -1.5}, {5.05, 4.9878}]}],
LineBox[{{5.1, 5.2446}, {5.1, 4.731}}],
LineBox[{
Offset[{1.5, 0}, {5.1, 5.2446}],
Offset[{-1.5, 0}, {5.1, 5.2446}]}],
LineBox[{
Offset[{1.5, 0}, {5.1, 4.731}],
Offset[{-1.5, 0}, {5.1, 4.731}]}]}, {
LineBox[{{6.18, 6.4685}, {6.0600000000000005`, 6.4685}}],
LineBox[{
Offset[{0, 1.5}, {6.18, 6.4685}],
Offset[{0, -1.5}, {6.18, 6.4685}]}],
LineBox[{
Offset[{0, 1.5}, {6.0600000000000005`, 6.4685}],
Offset[{0, -1.5}, {6.0600000000000005`, 6.4685}]}],
LineBox[{{6.12, 6.888199999999999}, {6.12, 6.0488}}],
LineBox[{
Offset[{1.5, 0}, {6.12, 6.888199999999999}],
Offset[{-1.5, 0}, {6.12, 6.888199999999999}]}],
LineBox[{
Offset[{1.5, 0}, {6.12, 6.0488}],
Offset[{-1.5, 0}, {6.12, 6.0488}]}]}, {
LineBox[{{7.21, 7.2003}, {7.069999999999999, 7.2003}}],
LineBox[{
Offset[{0, 1.5}, {7.21, 7.2003}],
Offset[{0, -1.5}, {7.21, 7.2003}]}],
LineBox[{
Offset[{0, 1.5}, {7.069999999999999, 7.2003}],
Offset[{0, -1.5}, {7.069999999999999, 7.2003}]}],
LineBox[{{7.14, 7.3345}, {7.14, 7.0661000000000005`}}],
LineBox[{
Offset[{1.5, 0}, {7.14, 7.3345}],
Offset[{-1.5, 0}, {7.14, 7.3345}]}],
LineBox[{
Offset[{1.5, 0}, {7.14, 7.0661000000000005`}],
Offset[{-1.5, 0}, {7.14, 7.0661000000000005`}]}]}, {
LineBox[{{8.24, 8.2944}, {8.08, 8.2944}}],
LineBox[{
Offset[{0, 1.5}, {8.24, 8.2944}],
Offset[{0, -1.5}, {8.24, 8.2944}]}],
LineBox[{
Offset[{0, 1.5}, {8.08, 8.2944}],
Offset[{0, -1.5}, {8.08, 8.2944}]}],
LineBox[{{8.16, 8.524799999999999}, {8.16, 8.064}}],
LineBox[{
Offset[{1.5, 0}, {8.16, 8.524799999999999}],
Offset[{-1.5, 0}, {8.16, 8.524799999999999}]}],
LineBox[{
Offset[{1.5, 0}, {8.16, 8.064}],
Offset[{-1.5, 0}, {8.16, 8.064}]}]}}}, {}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{All, All},
PlotRangeClipping->True,
PlotRangePadding->{Automatic, Automatic}]\)