A322652 Numbers that are sums of consecutive heptagonal pyramidal numbers (A002413).
0, 1, 8, 9, 26, 34, 35, 60, 86, 94, 95, 115, 175, 196, 201, 209, 210, 308, 311, 371, 397, 405, 406, 456, 504, 619, 645, 679, 705, 713, 714, 764, 880, 960, 1075, 1101, 1135, 1161, 1166, 1169, 1170, 1409, 1508, 1525, 1605, 1720, 1780, 1806, 1814, 1815, 1911, 1981, 2046, 2289, 2380
Offset: 1
Keywords
Links
- Eric Weisstein's World of Mathematics, Heptagonal Pyramidal Number
Programs
-
Mathematica
imax = 55; A002413 = LinearRecurrence[{4, -6, 4, -1}, {1, 8, 26, 60}, imax]; Join[{0}, Table[A002413[[i ;; j]] // Total, {i, 1, imax}, {j, i, imax}] // Flatten // Union][[;; imax]] (* Jean-François Alcover, Nov 11 2024 *)