In[]:=
M[x_]:=2x^7-0.5x^2+x
In[]:=
B[y_]:=-2y^8+y+1
In[]:=
Plot[M[x],{x,0,1.1},AxesLabel{"x","M(x)"},PlotStyleBlue]
Out[]=
In[]:=
Plot[B[y],{y,0,1.1},AxesLabel{"y","B(y)"},PlotStyleBlue]
Out[]=
​
NSolve
:0 is not a valid variable.
ReplaceAll
:0.1+y-2
2
y
 is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing.
NSolve
:0 is not a valid variable.
ReplaceAll
:0.0011+y-2
2
y
 is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing.
NSolve
:0 is not a valid variable.
General
:Further output of NSolve::ivar will be suppressed during this calculation.
ReplaceAll
:0.0081+y-2
2
y
 is neither a list of replacement rules nor a valid dispatch table, and so cannot be used for replacing.
General
:Further output of ReplaceAll::reps will be suppressed during this calculation.
​
​
​