Fibonacci word/fractal: Difference between revisions

Content added Content deleted
m (Sp.)
Line 343: Line 343:
<lang J>require 'plot'
<lang J>require 'plot'
plot }:+/\ 0,*/\(^~ 0j_1 0j1 $~ #)'0'=_1{::F_Words 20</lang>
plot }:+/\ 0,*/\(^~ 0j_1 0j1 $~ #)'0'=_1{::F_Words 20</lang>

Note that we need the definition of F_Words from the [[Fibonacci_word#J|Fibonacci word]] page:

<lang J>F_Words=: (,<@;@:{~&_1 _2)@]^:(2-~[)&('1';'0')</lang>


However, image uploads are currently disabled, and rendering images of this sort as wikitext gets bulky.
However, image uploads are currently disabled, and rendering images of this sort as wikitext gets bulky.