OFFSET
1,2
PROG
(Haskell)
import Data.List (elemIndices)
a193460 n = a193460_list !! (n-1)
a193460_list = elemIndices 0 $ 1 : zipWith (-) a193459_list a000005_list
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Reinhard Zumkeller, Jul 26 2011
STATUS
approved