A031287 Position of n-th 0 in A007376.

0, 11, 31, 51, 71, 91, 111, 131, 151, 171, 191, 192, 194, 197, 200, 203, 206, 209, 212, 215, 218, 222, 252, 282, 312, 342, 372, 402, 432, 462, 491, 492, 494, 497, 500, 503, 506, 509, 512, 515, 518, 522, 552, 582, 612, 642, 672, 702

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• less
• base
• look

Comments

A007376(a(n)) = 0;

a(n) = Max{A031287(n), A031288(n), A031289(n), A031290(n), A031291(n), A031292(n), A031293(n), A031294(n), A031295(n), A031296(n)}. [Reinhard Zumkeller, Jul 28 2011]

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10001 [a(1)=0 inserted by _Georg Fischer_, Apr 28 2020]

Crossrefs

Cf. A193428.

Programs

Haskell

import Data.List (elemIndices)
a031287 n = a031287_list !! (n-1)
a031287_list = map (+ 1) $ elemIndices 0 a007376_list
-- Reinhard Zumkeller, Jul 28 2011

Extensions

a(1)=0 inserted for consistency with change in A007376 by Sean A. Irvine, Apr 21 2020