The OEIS Foundation is grateful to everyone who made a donation during our Annual Appeal. Visit the new and spectacular Pictures from the OEIS page!
A132157(a(n)) = 1.
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
import Data.List (elemIndices)
a202016 n = a202016_list !! (n-1)
a202016_list = map (+ 1) $ elemIndices 1 a132157_list
Sequence in context: A082008 A105330 A097545 * A073627 A062042 A107817
Adjacent sequences: A202013 A202014 A202015 * A202017 A202018 A202019
Reinhard Zumkeller, Dec 08 2011