Re: Some basic Help
- To: mathgroup@smc.vnet.net
- Subject: [mg12385] Re: [mg12314] Some basic Help
- From: "Jrgen Tischer" <jtischer@pitagoras.univalle.edu.co>
- Date: Sun, 10 May 1998 02:05:07 -0400
Hi Jason, is this what you want?
RandomThales :=
With[{x = {Random[], Random[]},
y = {Random[], Random[]}, f = 2*Pi*Random[]},
Polygon[{x, y, (x + y)/2 +
1/2*norm[x - y]*{Cos[f], Sin[f]}}]]
But beware! Please check Martin Gardner, Mathematical Puzzles and
Diversions, the problem about the random chord before you jump to
conclusions.
Jrgen
-----Original Message-----
From: jason jacobson <jjacobson@MACALESTER.EDU> To:
mathgroup@smc.vnet.net
Subject: [mg12385] [mg12314] Some basic Help
>Hello!
>
>Does anyone have any suggestions for generating Random RIGHT triangles.
>I found a way to generate random triangles through the PLOT command,
>but do not know how to generate right ones.
>
>Please email me w/ help. Thanks
>