%I A069784
%S A069784 1,2,3,4,5,6,7,8,9,12,13,14,18,19,30,31,32,35,38,39
%N A069784 GCD[d[(n!)^3],d[n! ]]=2^k, i.e. is a power of 2.
%e A069784 The corresponding powers of 2 are in A068783.
%t A069784 Do[s=GCD[DivisorSigma[0, (n!)^3], DivisorSigma[0, n! ]]; If[IntegerQ[n/
               100], Print[{n}]]; If[IntegerQ[Log[2, s]], Print[n]], {n, 1, 10000}]
%Y A069784 Cf. A000005, A000142, A069780-A069783.
%Y A069784 Sequence in context: A009993 A055569 A072618 this_sequence A048097 A130843 
               A087087
%Y A069784 Adjacent sequences: A069781 A069782 A069783 this_sequence A069785 A069786 
               A069787
%K A069784 nonn
%O A069784 1,2
%A A069784 Labos E. (labos(AT)ana.sote.hu), Apr 08 2002