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 A127114 #11 Feb 15 2014 12:32:08 %S A127114 1,1,2,6,33,231,2046,20460,225360,3040650,42562410,663200340, %T A127114 14604306060,310211542410,6204234151200,163322250505200, %U A127114 4256423144450400,134630366022322500,3634363143602406600,134462435323300144200,4233013654405404511500 %N A127114 n! in base 7. %C A127114 Number of digits in A127114(n) = A127033(n) + 1. %t A127114 b = Table[IntegerDigits[n!, 7], {n, 1, 15}]; a = {}; Do[AppendTo[a, FromDigits[b[[x]]]], {x, 1, Length[b]}]; a (*_Artur Jasinski_*) %t A127114 FromDigits[IntegerDigits[#,7]]&/@(Range[0,20]!) (* _Harvey P. Dale_, Jun 19 2011 *) %Y A127114 Cf. A127109, A127110, A036603, A127112, A127113, A127114, A127115, A127116, A127033. %K A127114 nonn,base %O A127114 0,3 %A A127114 _Artur Jasinski_, Jan 05 2007 %E A127114 More terms from _Harvey P. Dale_, Jun 19 2011