We enter our data and plot it.
We enter our data and plot it.
Input :=
data = {{10,.02},{40,.1},{70,.21},{90,.45},
{100,.5},{120,.65},{125,.75},{150,.9},{175,.98}};
Input :=
dataPlot = ListPlot[data,PlotStyle->{PointSize[.02]},
PlotRange->{{0,200},{0,1}},
AxesLabel->{"Mass of Rock",
"% saying mass > 100 g"}]
Output = -Graphics-