Re: Building Lists
- To: mathgroup at smc.vnet.net
- Subject: [mg22365] Re: Building Lists
- From: Jacqueline Zizi <jazi at club-internet.fr>
- Date: Fri, 25 Feb 2000 21:14:25 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Hi Tom, You have one constant (centre (0,0)) and 2 parameters: list of colors and thickness. eye [list__, thickness_] := Show[Graphics[MapThread[List, {list, Map [Disk[{0, 0}, #] &, thickness]}], AspectRatio -> Automatic]]; Instances: eye [{Blue, Red, Purple, Plum, Gold, Olive, Pink, Navy, Mint, Black}, {200, 180, 160, 140, 120, 100, 80, 60, 40, 20}] eye [{Blue, Red, Purple, Plum, Gold, Olive, Pink, Navy, Mint, Black}, {200, 180, 160, 140, 110, 100, 90, 80, 30, 20}] I hope this helps Jacqueline Zizi