A156556 a(n) = Sum_{k=1..n} (n^k mod (n+k)).

0, 1, 2, 10, 9, 23, 26, 43, 40, 67, 73, 80, 69, 124, 155, 156, 186, 232, 186, 247, 258, 312, 388, 345, 310, 568, 377, 541, 580, 585, 530, 673, 615, 911, 777, 1048, 830, 948, 702, 1271, 1024, 1286, 1403, 1320, 1159, 1458, 1388, 1545, 1590, 1632, 1714, 1906, 1883

Offset

0,3

Links

Table of n, a(n) for n=0..52.

Maple

P:=proc(i) local a, n; for n from 0 by 1 to i do a:=sum('(n^k mod (n+k))', 'k'=1..n); print(a); od; end: P(100);

Prog

(PARI) a(n) = sum(k=1, n, n^k%(n+k)); \\ Jinyuan Wang, Aug 02 2021

Crossrefs

Cf. A156557, A156558, A156559

Sequence in context: A081100 A215463 A066556 * A071808 A355486 A168381

Adjacent sequences: A156553 A156554 A156555 * A156557 A156558 A156559

Keyword

nonn,easy

Author

Paolo P. Lava and Giorgio Balzarotti, Feb 10 2009

Status

approved