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 A090661 #6 Mar 20 2015 03:16:44
%S A090661 5,8,13,15,31,34,39,95,167,325,380,470,547
%N A090661 Numbers n such that prevprime(n!) - n*prevprime((n-1)!) < 0.
%t A090661 PrevPrim[ n_ ] := Block[ {k = n - 1}, While[ !PrimeQ[ k ], k-- ]; k ]; Select[ Range[ 275 ], PrevPrim[ #! ] - #*PrevPrim[ (# - 1)! ] < 0 & ] (* _Robert G. Wilson v_ *)
%Y A090661 Cf. A090660.
%K A090661 nonn
%O A090661 1,1
%A A090661 Mohammed Bouayoun (bouyao(AT)wanadoo.fr), Dec 15 2003
%E A090661 More terms from _Robert G. Wilson v_, Dec 20 2003