MathGroup Archive 2002

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

Search the Archive

Re: Problem using a loop to generate data for Point function


Hi,

Show[Graphics[Table[Point[{i, i}], {i, 10}]]]

or

Show[Graphics[Point [{#, #}] & /@ Range[10]]]


if you prefer a stupid and useless construct like For[]

Show[Graphics[
    lst = {};
    For[i = 1, i < 10, i++, AppendTo[lst, Point[{i, i}]]];
    lst
    ]
]

Regards
  Jens

Michael Carnright wrote:
> 
> For[i = 1, i < 10, i++, Show[Graphics[Point[{i, i}]]]]
> 
> This genereates nine graphics with one point each.  I was trying to
> generate one graphic with nine points.  I see my problem as calling
> the Point function nine times instead of only once.  I wish to use the
> data generated by the loop on a single graphic.
> 
> Thanks in advance for help on this :)
> 
> P.S.  In the end I will be doing three For loops in a nested formation
> to generate the data to put on one graphic.
> 
> -Michael


  • Prev by Date: Re: Q: Solving Numerical Matrix-Equation
  • Next by Date: Re: Memory leak? Self-created non-executable Help notebook?
  • Previous by thread: RE: Problem using a loop to generate data for Point function
  • Next by thread: Re: Problem using a loop to generate data for Point function