This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A127125 #5 Mar 30 2012 17:35:17 %S A127125 1,1,1,1,2,1,1,1,1,1,4,3,3,1,2,1,1,1,1,1,1,9,6,6,3,6,3,1,2,1,2,1,1,1, %T A127125 1,1,1,1,1,20,16,16,9,15,7,4,6,4,7,3,1,2,2,2,2,2,1,1,1,1,1,1,1,1,1,1, %U A127125 1,1,48,37,37,23,41,18,11,18,9,18,7,4,7,7,7,7,7,3,1,2,2,2,1,3,2,1,2,2,1,1,1 %N A127125 Triangle read by rows: T(n,k) is the number of endofunctions on n objects where the multiset of loop sizes forms the k-th partition in Mathematica ordering. %C A127125 The number of loops is equal to the number of components, but the sizes may be smaller. %e A127125 For n = 3, the 7 endofunctions are (1,2,3) -> (1,1,1), (1,1,2), (1,2,1), (2,1,1), (1,2,3), (1,3,2) and (2,3,1). The loops are respectively 1, 1, 1|2, 12, 1|2|3, 1|23 and 123, corresponding to partitions [1], [1], [1^2], [2], [1^3], [2,1] and [3]. The partitions of 1 to 3 in Mathematica order are [1], [2], [1^2], [3], [2,1] and [1^3], so row 3 is 2, 1,1, 1,1,1. %e A127125 The triangle starts: %e A127125 1 %e A127125 1, 1 1 %e A127125 2, 1 1, 1 1 1 %e A127125 4, 3 3, 1 2 1, 1 1 1 1 1 %K A127125 nonn,tabf %O A127125 1,5 %A A127125 _Franklin T. Adams-Watters_, Jan 05 2007