A319788 Tetrahedral numbers divisible by a record number of smaller tetrahedral numbers.
1, 4, 20, 120, 560, 19600, 27720, 1521520, 7207200, 2845642800, 4170866700, 249466897680, 9117204216120, 1723262134513920, 2525472914524560, 189169152233901840, 1782424363173854400, 28708458878287188000, 15137401000857582807360, 32632841312905676442600, 647550654467707884653760
Offset: 1
Keywords
Examples
4 is a term because it is the smallest tetrahedral number divisible by the only positive smaller tetrahedral number 1. 20 is a term because it divisible by 1,4,10, and has more divisors than each of 1,4,10, the only smaller terms.
Programs
-
PARI
t(n) = n*(n+1)*(n+2)/6; f(n) = my(tn=n*(n+1)*(n+2)/6); sum(k=1, n-1, (tn % t(k)) == 0); lista(nn) = {my(nb = - 1, new); for (n=1, nn, new = f(n); if (new > nb, print1(t(n), ", "); nb = new););} \\ Michel Marcus, Oct 02 2018
Extensions
a(17)-a(18) from Giovanni Resta, Sep 28 2018
a(19)-a(21) from Bert Dobbelaere, Mar 21 2021
Comments