A070036 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A070036

a(n)=A070034(n)-A070035(n).

1, 1, 1, 2, 1, 1, 3, 2, 3, 4, 1, 3, 2, 4, 2, 3, 3, 3, 1, 3, 2, 2, 3, 5, 2, 3, 4, 4, 3, 5, 4, 1, 3, 2, 2, 3, 4, 2, 3, 3, 4, 6, 2, 3, 4, 5, 5, 4, 4, 3, 4, 5, 5, 1, 3, 2, 2, 3, 4, 2, 3, 3, 4, 2, 3, 3, 5, 7, 2, 4, 5, 5, 3, 4, 4, 6, 5, 6, 3, 4, 4, 5, 1, 3, 2, 2, 3, 4, 2, 3, 3, 4, 2, 3, 3, 5, 2, 3, 3, 8, 2, 4, 5, 6, 5

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,4

LINKS

Table of n, a(n) for n=1..105.

FORMULA

a(n)=A070034(n)-Log[2, A068496(A070034(n))].

MATHEMATICA

Do[s=Mod[n!, 2^n]; If[IntegerQ[Log[2, s]], Print[n-Log[2, s]]], {n, 1, 1000}]

CROSSREFS

Cf. A000142, A000079, A068496, A070034, A070035.

Sequence in context: A112592 A370666 A351466 * A059779 A291874 A049346

Adjacent sequences: A070033 A070034 A070035 * A070037 A070038 A070039

KEYWORD

nonn

AUTHOR

Labos Elemer, Apr 17 2002

STATUS

approved