A099549 Odd part of n modulo 8.

1, 1, 3, 1, 5, 3, 7, 1, 1, 5, 3, 3, 5, 7, 7, 1, 1, 1, 3, 5, 5, 3, 7, 3, 1, 5, 3, 7, 5, 7, 7, 1, 1, 1, 3, 1, 5, 3, 7, 5, 1, 5, 3, 3, 5, 7, 7, 3, 1, 1, 3, 5, 5, 3, 7, 7, 1, 5, 3, 7, 5, 7, 7, 1, 1, 1, 3, 1, 5, 3, 7, 1, 1, 5, 3, 3, 5, 7, 7, 5, 1, 1, 3, 5, 5, 3, 7, 3, 1, 5, 3, 7, 5, 7, 7, 3, 1, 1, 3, 1, 5, 3

Offset

1,3

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Formula

a(n) = A010877(A000265(n)).

Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 4. - Amiram Eldar, Aug 29 2024

Mathematica

a[n_] := Mod[n / 2^IntegerExponent[n, 2], 8]; Array[a, 100] (* Amiram Eldar, Aug 29 2024 *)

Prog

(PARI) a(n) = (n>>valuation(n, 2))%8 \\Charles R Greathouse IV, May 14 2014

Crossrefs

Cf. A000265, A010877.

Cf. A099544, A099545, A099546, A099547, A099548, A099550, A099551.

Sequence in context: A127418 A099550 A349341 * A334212 A082725 A308655

Adjacent sequences: A099546 A099547 A099548 * A099550 A099551 A099552

Keyword

nonn,easy

Author

Ralf Stephan, Oct 23 2004

Status

approved