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 A134644 #2 Mar 31 2012 10:22:05 %S A134644 0,2,30,54,78,108,114,120,156,180,198,210,216,228,194,198,214,222,238, %T A134644 242,294,298,334,346,358,366,414,422,434,446,482,486,538,542,558,566, %U A134644 582,586,694,698,714,722,738,742,894,898,954,970,978,990,1014,1022,1054 %N A134644 Even permutational numbers A134640. %C A134644 Odd permutational numbers see A134643 %t A134644 a = {}; b = {}; Do[AppendTo[b, n]; w =Permutations[b]; Do[j = FromDigits[w[[m]], n + 1]; If[OddQ[j], AppendTo[a, j]], {m, 1, Length[w]}], {n, 0, 10}]; a (*Artur Jasinski*) %Y A134644 Cf. A134640, A134641, A134642, A134643. %K A134644 nonn %O A134644 1,2 %A A134644 _Artur Jasinski_, Nov 05 2007