load 'viewmat' and load 'plot' assumed when needed.
Mandelbrot set
(0,?$~99 3)viewmat+/2<|(j./~i:2j479)(+*:) ::(3:)"0^:(i.99)0
Sierpinski triangle
viewmat(,~,.~)^:8,1
J quick art
2015 Nov 06
2015 Nov 06
load 'viewmat' and load 'plot' assumed when needed.
(0,?$~99 3)viewmat+/2<|(j./~i:2j479)(+*:) ::(3:)"0^:(i.99)0
viewmat(,~,.~)^:8,1