A160229 Write Pi-3 in binary and report the number of ones in the first 10^n decimal places.

2, 40, 488, 4985, 50077, 499721, 5002607, 5000079

Offset

1,1

Links

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

Formula

A160228(n)+A160229(n)=A011557(n) for n=1...

Mathematica

f[n_] := Count[ RealDigits[Pi - 3, 2, 10^n - 2][[1]], 1] + 2; Do[ Print[{n, f@n}], {n, 8}]

Crossrefs

Cf. A004601, A011557, A160229.

Sequence in context: A035604 A180429 A108033 * A012807 A127186 A139747

Adjacent sequences: A160226 A160227 A160228 * A160230 A160231 A160232

Keyword

base,nonn

Author

Robert G. Wilson v, May 04 2009

Status

approved