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 A139170 #5 Jun 20 2012 12:04:07
%S A139170 3,2,3,31,25,2,721,16,561,13,3628801,11,479001601,361,9,316,
%T A139170 20922789888001,281,6402373705728001,7,241,1814401,
%U A139170 1124000727777607680001,6,1596673,239500801,1478401,181
%N A139170 a(n) = A136156(n) + 1.
%t A139170 a = {}; Do[m = 1; While[ ! IntegerQ[(n + Prime[m]!)/n], m++ ]; AppendTo[a, (n + Prime[m]!)/n], {n, 1, 100}]; a (*Artur Jasinski*)
%Y A139170 Cf. A136156.
%Y A139170 Cf. A082672, A089085, A089130, A117141, A007749, A139056-A139066, A020458, A139068, A137390, A139070-A139075, A139148-A139157, A139159, A139160-A139166, A139089, A139168-A139170.
%K A139170 nonn
%O A139170 1,1
%A A139170 _Artur Jasinski_, Apr 11 2008