Or a Julia set dendrite?
dendrite =: (((0j1&+@:*:@:])`]@.(2&<@:|@:]))^:12) ]
a. {~ 33+31| >. 100* |dendrite"(0)50%~grid 200
This one looks pretty messed up in ASCII (I multiplied by 100 before
ascii-ifying, which isn't necessary, but adds more wackyness to the ascii image)
> From: [email protected]
> To: [email protected]
> Date: Thu, 13 Aug 2015 15:44:02 +0100
> Subject: Re: [Jprogramming] ascii art
>
> How about a Mandelbrot set ASCII art?
>
> mandelbrot =: (+ *:)`]@.(2&<@:|@:])^:12 ]
>
>
>
>
>
> grid=:|:@:(j./~@:(i.--:))
>
>
>
>
> a. {~ 33+31| >. | mandelbrot"(0)25%~grid 100
>
>
>
>
>
> > From: [email protected]
> > To: [email protected]
> > Date: Thu, 13 Aug 2015 10:06:02 -0400
> > Subject: [Jprogramming] ascii art
> >
> > quad tree:
> >
> > (2 2$<@])^:4 i.0 0
> >
> > Sierpinki square:
> >
> > (<@[ (<1;1)} 3 3$<@])^:3~ i.0 0
> >
> >
> >
> > ----------------------------------------------------------------------
> > For information about J forums see http://www.jsoftware.com/forums.htm
>
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
