A202340 Number of times n occurs in Hofstadter H-sequence A005374.

1, 2, 1, 1, 2, 2, 1, 2, 1, 1, 2, 1, 1, 2, 2, 1, 1, 2, 2, 1, 2, 1, 1, 2, 2, 1, 2, 1, 1, 2, 1, 1, 2, 2, 1, 2, 1, 1, 2, 1, 1, 2, 2, 1, 1, 2, 2, 1, 2, 1, 1, 2, 1, 1, 2, 2, 1, 1, 2, 2, 1, 2, 1, 1, 2, 2, 1, 2, 1, 1, 2, 1, 1, 2, 2, 1, 1, 2, 2, 1, 2, 1, 1, 2, 2, 1

Offset

0,2

Comments

a(A202341(n)) = 1; a(A202342(n)) = 2.

Links

Reinhard Zumkeller, Table of n, a(n) for n = 0..10000

Eric Weisstein's World of Mathematics, Hofstadter H-Sequence.

Wikipedia, Hofstadter sequence

Index entries for Hofstadter-type sequences

Prog

(Haskell)
import Data.List (group)
a202340 n = a202340_list !! n
a202340_list = map length $ group a005374_list

Crossrefs

Cf. A005374, A202341, A202342.

Sequence in context: A264714 A375855 A265209 * A049705 A060236 A006345

Adjacent sequences: A202337 A202338 A202339 * A202341 A202342 A202343

Keyword

nonn

Author

Reinhard Zumkeller, Dec 17 2011

Status

approved