MathGroup Archive 2001

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

Search the Archive

Re: webMathematica

  • To: mathgroup at
  • Subject: [mg31598] Re: webMathematica
  • From: Au Han Bin <auhb3 at>
  • Date: Thu, 15 Nov 2001 05:52:32 -0500 (EST)
  • References: <9qjjnd$j8a$> <9qrcm7$bvn$> <9sdkp4$5vh$> <9sgedl$93e$>
  • Sender: owner-wri-mathgroup at

Hi, I am a mathematica newbie with urgent problems with how to create a branching tree. i have a template for it.
however, can someone show me a more efficient or understandable version of how to make a branching tree.

(2) i also like to inquire if, i like to modify my algorithm, such that i can bend my last branch in a differnt
angle that is a user input.

Thank you for your guidance,

regards, a desperate mathematica newbie

rotate2d[a_, tht_, b_]:=b + {{Cos[tht],-Sin[tht]},

twinline[Line[{start_, end_}]]:=
{Line[{end, end + shrinkage rotate2d[end-start, rotation,{0,0}]}],
Line[{end, end + shrinkage rotate2d[end -start, -rotation,{0,0}]}] }

Show[Graphics[{ Line[{{0,0},{0,1}}],twinline[Line[{{0.,0.},{0.,1.}}]] }],


AspectRatio->Automatic, PlotRange->All]

  • Prev by Date: Re: Spherical Harmonics
  • Next by Date: Re: Passing functions to C-code
  • Previous by thread: Re: webMathematica
  • Next by thread: Complex Number Simultaneous Equation 2 Unknowns