A322636 Numbers that are sums of consecutive heptagonal numbers (A000566).

0, 1, 7, 8, 18, 25, 26, 34, 52, 55, 59, 60, 81, 89, 107, 112, 114, 115, 136, 148, 170, 188, 189, 193, 195, 196, 235, 248, 260, 282, 286, 300, 307, 308, 337, 341, 342, 396, 403, 424, 430, 448, 449, 455, 456, 469, 521, 530, 540, 572, 585, 616, 619, 628, 637, 644, 645, 684, 697

Offset

1,3

Links

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

Eric Weisstein's World of Mathematics, Heptagonal Number

Mathematica

terms = 59;
nmax = 17; kmax = 9; (* empirical *)
T = Table[n(5n-3)/2, {n, 0, nmax}];
Union[T, Table[k MovingAverage[T, k], {k, 2, kmax}]//Flatten][[1 ;; terms]] (* Jean-François Alcover, Dec 26 2018 *)

Crossrefs

Cf. A000566, A002413, A034705, A034706, A319184, A319185, A322637.

Sequence in context: A144614 A308953 A143504 * A309482 A308926 A152043

Adjacent sequences: A322633 A322634 A322635 * A322637 A322638 A322639

Keyword

nonn

Author

Ilya Gutkovskiy, Dec 21 2018

Status

approved