hello one and all,
I can not figure out why Mathematica will not plot this function under the LogLogPlot fxn. here is my code:
data = {{.1, 99}, {.02, 50.2}, {.004, 25.9}, {.0008, 13.4}, {.00016,
6.7}, {.000032, 4.1}, {.0000064, 3.1}}
p1 = ListLogLogPlot[data, PlotStyle -> {Red, PointSize[0.015]}];
p2 = ListPlot[data, PlotStyle -> {Red, PointSize[0.015]}];
q1 = Log[ems - a] == m Log[conc] + b
q1s = Solve[q1, ems];
q2 = Normal[q1s][[1, 1, 2]]
nlf1 = NonlinearModelFit[data, q2, {m, b, a}, conc];
nlf1P = nlf1["BestFitParameters"]
q3 = Normal[nlf1]
LogLogPlot[q3 /. nlf1P, {conc, 0, .11}]
Show[{p1, LogLogPlot[q3 /. nlf1P, {conc, 0, .11}]}]
Show[{Plot[q3, {conc, 0, .11}], p2}]
where the fit seems good and and plots well on the linear, linear plot, but not on the log, log plot. so let me know and thank you in advance, Lucas