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 A200146 #16 Mar 30 2012 17:27:26 %S A200146 1,1,1,1,0,3,1,1,1,1,1,2,3,4,5,1,1,1,1,1,1,1,0,3,0,5,0,7,1,4,0,7,7,0, %T A200146 4,1,1,2,3,4,5,6,7,8,9,1,1,1,1,1,1,1,1,1,1,1,8,3,4,5,0,7,8,9,4,11,1,1, %U A200146 1,1,1,1,1,1,1,1,1,1 %N A200146 Triangle read by rows: T(n, k) = mod(k^(n - 1), n), where 1 <= k < n. %C A200146 Per Fermat's Little theorem, if n is prime, then row n is all 1s. However, if n is composite, that does not necessarily guarantee that the first column 1 is the only one in the row. %e A200146 The first seven rows are %e A200146 1 %e A200146 1, 1 %e A200146 1, 0, 3 %e A200146 1, 1, 1, 1 %e A200146 1, 2, 3, 4, 5 %e A200146 1, 1, 1, 1, 1, 1 %e A200146 1, 0, 3, 0, 5, 0, 7 %e A200146 We observe that the tenth row consists of the numbers 1 to 9 in order. In base 10, the least significant digit of n^9 is the same as that of n. %t A200146 Column[Table[Mod[k^(n - 1), n], {n, 2, 13}, {k, n - 1}], Center] (* Nov 14 2011 *) %Y A200146 Cf. A089072, A066340 (Fermat's triangle). %K A200146 nonn,easy,tabl %O A200146 2,6 %A A200146 _Alonso del Arte_, Nov 13 2011