       ListPlot Problem

• To: mathgroup at smc.vnet.net
• Subject: [mg92901] ListPlot Problem
• From: "Youness Eaidgah" <y.eaidgah at gmail.com>
• Date: Fri, 17 Oct 2008 05:25:14 -0400 (EDT)

```Dear Masters,
I wrote the following simple program to make a ListPlot, but it dose not
work:

In:= Clear[x, a, b, c, d]

In:= a =
N[Dynamic[
Simplify[(8000*35 - 4000*(65 - x))*0.11 + (10000*35 -
2000*(65 - x))*0.11 + (12000*100 -
12000*65)*0.28 + (12000*100 - 12000*65)*0.22 + (12000*100 -
12000*65)*0.18 + (12000*100 - 12000*65)*0.1]], 10]
In:= b =
Dynamic[Simplify[(8000*100 + 6000*x - 14000*65)*0.11 + (10000*100 +
4000*x - 14000*65)*0.11 + (12000*100 + 2000*x -
14000*65)*0.28 + (14000*100 - 14000*65)*0.22 + (14000*100 -
14000*65)*0.18 + (14000*100 - 14000*65)*0.1]];

In:= c =
Dynamic[Simplify[(8000*100 + 8000*x - 16000*65)*0.11 + (10000*100 +
6000*x - 16000*65)*0.11 + (12000*100 + 4000*x -
16000*65)*0.28 + (14000*100 + 2000*x -
16000*65)*0.22 + (16000*100 - 16000*65)*0.18 + (16000*100 -
16000*65)*0.1]];

In:= d = Dynamic[Simplify[
(8000*100 + 10000*x - 18000*65)*0.11 + (10000*100 + 8000*x -
18000*65)*0.11 + (12000*100 + 6000*x -
18000*65)*0.28 + (14000*100 + 4000*x -
18000*65)*0.22 + (16000*100 + 2000*x -
18000*65)*0.18 + (18000*100 - 18000*65)*0.1]];

In:= f = {{12000, a}, {14000, b}, {16000, c}, {18000, d}}

x= 10;

In:= ListPlot[{f}]

and surprisingly i get no plot and also no error message, just a chart
without any point on it!! I have worked on it for a while, reading the list
plot options, but I am not able to get out of the mess. I would appreciate
if you could help me out.
Bests,
Jonas

```

• Prev by Date: Dynamic problem (possibly simple)
• Next by Date: Re: labeling axes in a ContourPlot
• Previous by thread: RE: Re: Dynamic problem (possibly simple)
• Next by thread: Re: ListPlot Problem