|
| |
|
|
A069784
|
|
GCD[d[(n!)^3],d[n! ]]=2^k, i.e. is a power of 2.
|
|
1
| |
|
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 12, 13, 14, 18, 19, 30, 31, 32, 35, 38, 39
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| The corresponding powers of 2 are in A068783.
|
|
|
MATHEMATICA
| 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}]
|
|
|
CROSSREFS
| Cf. A000005, A000142, A069780-A069783.
Sequence in context: A190218 A055569 A072618 * A178338 A048097 A130843
Adjacent sequences: A069781 A069782 A069783 * A069785 A069786 A069787
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Apr 08 2002
|
| |
|
|
