login
A342712
Partial sums of A248333.
1
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
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
KEYWORD
nonn
AUTHOR
Slav E. Angelov, Mar 20 2021
STATUS
approved