Skip to main content
Mathematica

Return to Question

Post Closed as "Duplicate" by Jason B., Yves Klett, MarcoB, Öskå, m_goldberg
just some redundant symbols droped. original OP syntax is saved
Source Link
edit approved Dec 15, 2015 at 15:37
garej
edit approved Dec 15, 2015 at 15:37
garej
  • 4.9k
  • 2
  • 19
  • 43

I'm pretty new to Mathematica. I'd like to show the intersection points in my graphic. These are my inputs:

f[y_] := -10 x^2 + 4000 x;<p>x;
NSolve[f[y] == 144000, x]<p>x];
Plot[{f[y], 144000}, {x, 0, 400}, PlotRange -> {0, 400000}]

I'm pretty new to Mathematica. I'd like to show the intersection points in my graphic. These are my inputs:

f[y_] := -10 x^2 + 4000 x;<p>
NSolve[f[y] == 144000, x]<p>
Plot[{f[y], 144000}, {x, 0, 400}, PlotRange -> {0, 400000}]

I'm pretty new to Mathematica. I'd like to show the intersection points in my graphic. These are my inputs:

f[y_] := -10 x^2 + 4000 x;
NSolve[f[y] == 144000, x];
Plot[{f[y], 144000}, {x, 0, 400}, PlotRange -> {0, 400000}]
Tweeted twitter.com/StackMma/status/675925703431479296
Formatted code
Source Link
MarcoB
MarcoB
  • 67.7k
  • 18
  • 96
  • 198

  I'm pretty new to Mathematica.

 

I'dI'd like to show the intersection points in my graphic.

 

TheseThese are my inputs:

f[y_] := -10 x^2 + 4000 x;

NSolve[f[y] == 144000, x]

Plot[{f[y], 144000}, {x, 0, 400}, PlotRange -> {0, 400000}]

Thanks for your help!

puckie

f[y_] := -10 x^2 + 4000 x;<p>
NSolve[f[y] == 144000, x]<p>
Plot[{f[y], 144000}, {x, 0, 400}, PlotRange -> {0, 400000}]

  I'm pretty new to Mathematica.

 

I'd like to show the intersection points in my graphic.

 

These are my inputs:

f[y_] := -10 x^2 + 4000 x;

NSolve[f[y] == 144000, x]

Plot[{f[y], 144000}, {x, 0, 400}, PlotRange -> {0, 400000}]

Thanks for your help!

puckie

I'm pretty new to Mathematica. I'd like to show the intersection points in my graphic. These are my inputs:

f[y_] := -10 x^2 + 4000 x;<p>
NSolve[f[y] == 144000, x]<p>
Plot[{f[y], 144000}, {x, 0, 400}, PlotRange -> {0, 400000}]
Source Link
puckie
puckie
  • 51
  • 3

Show intersection points between a curve and a line

I'm pretty new to Mathematica.

I'd like to show the intersection points in my graphic.

These are my inputs:

f[y_] := -10 x^2 + 4000 x;

NSolve[f[y] == 144000, x]

Plot[{f[y], 144000}, {x, 0, 400}, PlotRange -> {0, 400000}]

Thanks for your help!

puckie