A030657 Parity of digits of Pi.

1, 1, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 0, 0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1

Offset

1,1

Links

Zak Seidov, Table of n, a(n) for n = 1..10000 [a(10000)=1 corrected by Georg Fischer, Jun 22 2020]

Formula

a(n) = A000035(A000796(n)). - Omar E. Pol, Oct 26 2013

Mathematica

s = First[RealDigits[N[Pi, 1000]]]; aa = {}; Do[If[OddQ[s[[n]]], AppendTo[aa, 1], AppendTo[aa, 0]], {n, 1, Length[s]}]; aa (* Artur Jasinski, Mar 05 2010 *)
s= RealDigits[N[Pi, 10000]][[1]]; Table[{n, Mod[s[[n]], 2]}, {n, 10000}](* this gives b-file *)(* Zak Seidov, Oct 05 2011*)

Crossrefs

Cf. A173999, A174000.

Sequence in context: A030302 A051023 A247795 * A249066 A176178 A267778

Adjacent sequences: A030654 A030655 A030656 * A030658 A030659 A030660

Keyword

nonn,base,easy

Author

Maghraoui Abdelkader

Extensions

More terms from Simon Plouffe.

Status

approved