A342712 Partial sums of A248333.

0, 0, 0, 1, 2, 4, 6, 9, 13, 17, 22, 28, 34, 41, 49, 58, 67, 77, 88, 100, 112, 125, 139, 154, 170, 186, 203, 221, 240, 260, 280, 301, 323, 346, 370, 395, 420, 446, 473, 501, 530, 560, 590, 621, 653, 686, 720, 755, 791, 827, 864, 902, 941, 981, 1022, 1064, 1106

Offset

1,5

Links

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

Formula

a(n) = A000217(n) - A342711(n-1) for n >= 1. [Corrected by Georg Fischer, Dec 13 2022]

Prog

(PARI) f(n) = sum(i=1, n, !(issquare(i-1) || issquare(floor(i-sqrt(i-1))))); \\ A248333
a(n) = sum(k=0, n, f(k)); \\ Michel Marcus, Mar 20 2021

Crossrefs

Cf. A248333, A000217, A342711.

Sequence in context: A087483 A154255 A232739 * A006697 A294860 A183920

Adjacent sequences: A342709 A342710 A342711 * A342713 A342714 A342715

Keyword

nonn

Author

Slav E. Angelov, Mar 20 2021

Status

approved