Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2000
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2000

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

Search the Archive

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




  • Prev by Date: Re: Saving as HTML -- Page width problems
  • Next by Date: linux question
  • Previous by thread: Re: Building lists
  • Next by thread: Re: Building lists