%I A060738
%S A060738 0,0,0,0,0,0,0,0,3,4,5,12,51,92,225,340,573,1325,2334,6024,8724,13130,
%T A060738 21601,46169,67213,106427,178014,242104,338499,727248,988029,1924615
%N A060738 Number of distinct differences between consecutive divisors (ordered 
               by increasing magnitude) of n! which are not also divisors of n!.
%F A060738 a(n)=A060763(n!)
%e A060738 For n up to 7 all divisor differences of n! are also divisors of n!. 
               For n=8, there are 3 divisor differences of 8!=40320 which are not 
               divisors of 8!, namely 27, 54 and 108.
%t A060738 a[n_ ] := Length[Complement[Drop[d=Divisors[n! ], 1]-Drop[d, -1], d]]
%Y A060738 Cf. A000142, A027423, A060737, A060742, A060763.
%Y A060738 Sequence in context: A141290 A010752 A049929 this_sequence A090651 A062201 
               A049895
%Y A060738 Adjacent sequences: A060735 A060736 A060737 this_sequence A060739 A060740 
               A060741
%K A060738 more,nonn
%O A060738 0,9
%A A060738 Labos E. (labos(AT)ana.sote.hu), Apr 25 2001
%E A060738 Edited by Dean Hickerson (dean.hickerson(AT)yahoo.com), Jan 22 2002