A322640 Numbers that are sums of consecutive centered heptagonal numbers (A069099).

0, 1, 8, 9, 22, 30, 31, 43, 65, 71, 73, 74, 106, 114, 136, 144, 145, 148, 177, 197, 220, 242, 250, 251, 253, 254, 316, 325, 345, 368, 386, 390, 398, 399, 450, 451, 463, 522, 547, 565, 569, 587, 595, 596, 598, 638, 702, 704, 736, 766, 775, 818, 840, 841, 848, 849, 914, 953

Offset: 1

Author

Ilya Gutkovskiy, Dec 21 2018

Keywords

• nonn

Links

• Wikipedia, Centered heptagonal number

Crossrefs

Cf. A004126, A069099, A152043, A322610, A322611, A322636, A322638, A320728.

Programs

Mathematica

terms = 58;
nmax = 17; kmax =  8; (* empirical *)
T = Table[(7 n^2 - 7 n + 2)/2, {n, 1, nmax}];
Union[{0}, T, Table[k MovingAverage[T, k], {k, 2, kmax}] // Flatten][[1 ;; terms]] (* Jean-François Alcover, Dec 27 2018 *)