# StreamPlot plots only one plot

I want a phase diagram that characterizes the path of p and s using

StreamPlot[
{p^1.3 - .036*s, 0.05*p - 1500000000000/s},
{s, 10^8, 2*10^8},
{p, 100000, 200000},
PlotRange -> {{10^8, 2*10^8}, {100000, 200000}}
]


But that is not right. I'm expecting more paths.

Any suggestions on how to get more paths?

(I know, I have some big numbers, but if it provides one path, why not others? I'd rather not re-scale if I can get it to work this way because the quantities are meaningful.)

• StreamPlot does not do well with poorly scaled domains, in my experience. In rescaling, you can use Ticks to get the ticks marked as you like. – Michael E2 Jan 24 '17 at 21:57
• Try @Rahul's myStreamPlot from this answer to improve the spacing – Chris K Jan 25 '17 at 2:16

StreamPlot[{(p^1.3 - .036*s)/1000, .05*p - 1500000000000/s} /. s -> 1000 s // Evaluate,
{ChartingScaledTicks[{#/1000 &, 1000 # &}],