- Thoughts on J
19 jan 2012 Rauzy fractal ; graph
13 jan 2012 Haferman Carpet ; graph
24 nov 2011 Multiple Boxing
23 jul 2011 Penrose Tiling ; graph
26 dec 2010 Special code for f/.@:g
26 dec 2010 Polynomials
3 aug 2010 Length of winning strike
11 apr 2010 k-faces of a cube
23 mar 2010 H-fractal ; graph
8 mar 2010 (De)Convolution
21 feb 2010 Odometer
1 jan 2010 Koch pentaflake ; graph
25 dec 2009 Penrose-like Tiling ; graph
18 dec 2009 Markov Algorithm
17 nov 2009 Pythagoras Tree, non overlapping ; graph
9 nov 2009 Pythagoras Tree ; graph
24 oct 2009 Plotting depth ; graph
22 oct 2009 One line behind the other
21 oct 2009 Random walk on hexagonal grid ; graph
17 oct 2009 Sierpinski curve ; graph
5 oct 2009 Moore curve closed ; graph
28 sep 2009 Gosper flowsnake closed ; graph
22 sep 2009 Tilings ; graph
16 sep 2009 Peano original ; graph
7 sep 2009 Gosper island ; graph
28 aug 2009 Wide cut
11 aug 2009 Gosper flowsnake ; graph
23 jul 2009 Koch snowflake ; graph
22 jun 2009 Peano & Moore ; graph
16 jun 2009 3d plot
9 jun 2009 Tree sum
11 apr 2009 Hamming numbers
6 apr 2009 Reflected upper triangle
23 feb 2009 Fibonacci sequence
18 jan 2009 Sierpinski ; graph
7 jan 2009 Base
scores=: 5 ts&> ]
rnkng=: 3 : '([:(,~/:@/:@{.) [:(%<./)"1(,~*/)) &.|: y'
dspl=: 3 : 0 NB. y is output of rnkng; x is boxed names of verbs or formulas, or empty
z=: '2.0,0.2,0.2,0.2'(8!:0) y
z=: ('rank';'rlt_prf';'rlt_et';'rlt_sz'),z
:
NB. ('verbs';((<' '),&.>x),.((5!:5)`(5!:2)@.(0<[:# 1(5!:7)]))&.> R=:<"0 x),.~z
z=: '2.0,0.2,0.2,0.2'(8!:0) y
z=: ('rank';'rlt_prf';'rlt_et';'rlt_sz'),z
('verb';x),.z
)