%I #14 May 05 2019 13:15:50
%S 3,4,5,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,25,26,27,28,29,
%T 30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,
%U 53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78
%N Numbers that are not factorials.
%C The old entry with this sequence number was a duplicate of A002636.
%C A012245(a(n)) = 0. - _Reinhard Zumkeller_, Oct 11 2008
%H Harry J. Smith, <a href="/A063992/b063992.txt">Table of n, a(n) for n = 1..1000</a>
%t With[{nn=5},Complement[Range[nn!],Range[nn]!]] (* _Harvey P. Dale_, May 05 2019 *)
%o (PARI) { n=0; f=2; for (m=3, 10^9, g=f; f*=m; for (a=g + 1, f - 1, write("b063992.txt", n++, " ", a); if (n==1000, break)); if (n==1000, break) ) } \\ _Harry J. Smith_, Sep 05 2009
%Y Complement of A000142.
%K nonn
%O 1,1
%A _N. J. A. Sloane_, Oct 11 2008