A174000 Successive positions of even digits after comma in decimal expansion of Pi

2, 6, 7, 11, 16, 18, 19, 20, 21, 22, 23, 26, 28, 32, 33, 34, 35, 36, 41, 50, 52, 53, 54, 57, 59, 60, 63, 65, 67, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 81, 82, 83, 84, 85, 87, 88, 89, 92, 93, 97, 98, 101, 102, 104, 105, 106, 107, 108, 112, 113, 114, 116, 117, 118, 119

Offset

1,1

Links

Table of n, a(n) for n=1..65.

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

Cf. A000796, A173999.

Sequence in context: A286995 A088227 A231500 * A241720 A224082 A051678

Adjacent sequences: A173997 A173998 A173999 * A174001 A174002 A174003

Keyword

nonn,base

Author

Artur Jasinski, Mar 05 2010

Extensions

Edited by Charles R Greathouse IV, Aug 02 2010

Status

approved