OFFSET
1,1
EXAMPLE
Pi=3,141592653589793...
2 is in this sequence because second digit after comma 4 is even.
MATHEMATICA
s = First[RealDigits[N[Pi, 1000]]]; aa = {}; Do[If[OddQ[s[[n]]], AppendTo[aa, n - 1]], {n, 1, Length[s]}]; aa (*Artur Jasinski*)
Flatten[Position[RealDigits[Pi, 10, 150][[1]], _?EvenQ]]-1 (* Harvey P. Dale, Sep 12 2017 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Artur Jasinski, Mar 05 2010
EXTENSIONS
Edited by Charles R Greathouse IV, Aug 02 2010
STATUS
approved