[go: up one dir, main page]

login
A099547
Odd part of n modulo 6.
8
1, 1, 3, 1, 5, 3, 1, 1, 3, 5, 5, 3, 1, 1, 3, 1, 5, 3, 1, 5, 3, 5, 5, 3, 1, 1, 3, 1, 5, 3, 1, 1, 3, 5, 5, 3, 1, 1, 3, 5, 5, 3, 1, 5, 3, 5, 5, 3, 1, 1, 3, 1, 5, 3, 1, 1, 3, 5, 5, 3, 1, 1, 3, 1, 5, 3, 1, 5, 3, 5, 5, 3, 1, 1, 3, 1, 5, 3, 1, 5, 3, 5, 5, 3, 1, 1, 3, 5, 5, 3, 1, 5, 3, 5, 5, 3, 1, 1, 3, 1, 5, 3
OFFSET
1,3
LINKS
FORMULA
a(n) = A010875(A000265(n)).
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = 3. - Amiram Eldar, Aug 29 2024
MATHEMATICA
a[n_] := Mod[n / 2^IntegerExponent[n, 2], 6]; Array[a, 100] (* Amiram Eldar, Aug 29 2024 *)
PROG
(PARI) a(n) = (n>>valuation(n, 2))%6 \\Charles R Greathouse IV, May 14 2014
KEYWORD
nonn,easy
AUTHOR
Ralf Stephan, Oct 23 2004
STATUS
approved