GRAPHICS IN A DO LOOP DOES NOTHING
- To: mathgroup at smc.vnet.net
- Subject: [mg99445] GRAPHICS IN A DO LOOP DOES NOTHING
- From: Alain Mazure <alain.mazure at oamp.fr>
- Date: Wed, 6 May 2009 05:20:57 -0400 (EDT)
Hi
I tried to produce several circles using :
Do[Graphics[Circle[{x[[k]], x[[k]]}, 0.5]], {k, 4}]]
even "wrapping" with Print as explained in post mg78335
The command works for an individual set of data and can be superposed
with Show
, but how to do with a "large" number.
Graphics[Circle[{x[[1]], x[[1]]}, 0.5]
x1= {36.827, 36.5061, 36.1605, 35.8261}
y1= {-3.8282, -3.84959, -3.82263, -3.82826}
Thanks again for the help
Alain Mazure
Laboratoire d'Astrophysique de Marseille
P=F4le de l'=C9toile Site de Ch=E2teau-Gombert
38, rue Fr=E9d=E9ric Joliot-Curie
13388 Marseille cedex 13, France
http://alain.mazure.free.fr/
Mails:
alain.mazure at oamp.fr
alain.mazure at free.fr
Phones:
Lab: 33(0)491055902
Mobile: 33(0)603556287
Fax: 33(0)491661855
SKYPE: MAZURE-ALAIN