User:RE Boss/J-blog

Thoughts on J ::

• 17 juny 2014 New performance record for Fibonacci
  
• 21 may 2014 Zeckendorf representation
  
• 21 may 2014 convex hull
  
• 29 jan 2014 repeated squaring ; graph
  
• 21 mar 2012 Hilbert curve of order 3 in 3D ; graph
  
• 19 feb 2012 ßO curve ; graph
  
• 13 feb 2012 Takagi (blancmange) curve ; graph
  
• 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 plot 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
)