login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Partial sum of pi(k) from k = 1 to 2^n.
0

%I #4 Sep 02 2024 17:16:32

%S 1,5,19,61,203,669,2279,7797,27213,96111,343965,1240617,4513763,

%T 16546859,61027965,226454967,844181631,3161518957,11886015725,

%U 44847272299,169747439789,644345294711,2452231140853,9354606971985

%N Partial sum of pi(k) from k = 1 to 2^n.

%t s = 0; k = 1; Do[ While [k <= 2^n, s = s + PrimePi[k]; k++ ]; Print[s], {n, 1, 28} ]

%Y Cf. A000720, A073224.

%K nonn

%O 1,2

%A _Robert G. Wilson v_, Jul 30 2002