Annual Appeal: Please make a donation (tax deductible in USA) to keep the OEIS running. Over 5000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".
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