A255828 a(n) = n for n < 8; a(8n) = a(n); if every 8th term (a(8), a(16), a(24),...) is deleted, this gives back the original sequence.

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

Offset

1,2

Comments

A self-generating sequence. This is the m=8 analog of the m=10 variant A126616. Sequence A117943 is the m=3 analog with all terms decreased by 1.

Links

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

Formula

a(n) = a(n/8) if n==0 (mod 8); a(n) = a(n - floor(n/8)) otherwise.

Prog

(PARI) a(n, m=8)=while(n>=m, if(n%m, n-=n\m, n\=m)); n \\ M. F. Hasler, Mar 07 2015

Crossrefs

Cf. A117943, A255824 - A255829, A126616.

Sequence in context: A031035 A054634 A346731 * A277546 A190597 A338881

Adjacent sequences: A255825 A255826 A255827 * A255829 A255830 A255831

Keyword

nonn

Author

M. F. Hasler, Mar 07 2015

Status

approved