[Amusing trees] - A New Kind of Science: The NKS Forum

A New Kind of Science: The NKS Forum

Pages:1



Amusing trees

(Click here to view the original thread with full colors/images)



Posted by: Todd Rowland

I was just showing someone how to make the branching tree model. My first attempt had a bug, and the attached picture came out.

Anybody have any amusing tree pictures?

(This code is based on those pictures on p.402 here with two branches at every branching)
With[{a=.6,b=.3,t=4},
With[{m1={{a,b},{-b,a}},m2={{a,-b},{b,a}}},
Graphics[Line/@Flatten[NestList[
Flatten[With[{v=#[[2]]-#[[1]]},{{#[[2]],#[[2]]+m1.v},
{#[[2]],[[2]]+m2.v}}]&/@#,1]&,{{{0,0},{0,1}}},t],1],
PlotRange->All]]]




Posted by: mohammed1

I asked about three dimensional cellular automata are there three or four dimensional trees ?



Posted by: Michael Round

http://autosocratic.blogspot.com/

Here is a tree-structure my daughter created Valentine's Day, 2005 ...

Mike Round



Posted by: mohammed1

Très bien and terrific!





Forum Sponsored by Wolfram Research

© 2004-2008 Wolfram Research, Inc. | Powered by vBulletin 2.3.0 © 2000-2002 Jelsoft Enterprises, Ltd. | Disclaimer
vB Easy Archive Final - Created by Xenon and modified/released by SkuZZy from the Job Openings