and plot the revised data to compare with the function we obtained from our first approach to the problem.
and plot the revised data to compare with the function we obtained from our first approach to the problem.
Input :=
p1NewGood = ListPlot[goodNewData,PlotStyle->
{PointSize[.02]}]
Output = -Graphics-
Input := Show[pOil,p1NewGood]
Output = -Graphics-