Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

[Date Index] [Thread Index] [Author Index]

Search the Archive

Filling in ListPlot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg105058] Filling in ListPlot
  • From: fd <fdimer at gmail.com>
  • Date: Thu, 19 Nov 2009 05:24:38 -0500 (EST)

All

I'm having problems with Filling in ListPlot. I have two curves and
would like different colors as one curve goes above the other, here
goes the code;

aris = {10000, 5000, 1000, 500, 100, 50, 20}; y = 10000;

elist = Flatten[ConstantArray[#, IntegerPart[y/#]] & /@ aris];

n = 1;
ariList = Reverse[{N[y/n++], #} & /@ elist]

ListLogLogPlot[{ariList, {{1, 1}, {100000, 100000}}},
 PlotRange -> All, InterpolationOrder -> {0, 1}, Joined -> True,
 Filling -> {2 -> {{1}, {Yellow, Orange}}}]

If I define a interpolation function myself it works, but it is a bit
of a nuisance

f[x_] = Interpolation[ariList, InterpolationOrder -> 0][x];

LogLogPlot[{f[x], x}, {x, 10, 10000},
 Filling -> {2 -> {{1}, {Yellow, Orange}}}]


Is there a way of making it work correctly with ListPlot ? Would this
be a bug ?

Best
F.








  • Prev by Date: Freeze Panes in Grid Expression
  • Next by Date: Solve and the order of variables to solve for (v7.0)
  • Previous by thread: Re: Freeze Panes in Grid Expression
  • Next by thread: Re: Filling in ListPlot