OFFSET
0,4
LINKS
G. C. Greubel, Rows n = 0..100 of the triangle, flattened
FORMULA
T(n, k) = 1 + ( (n-k)! - k! )^2.
EXAMPLE
Triangle begins as:
1;
1, 1;
2, 1, 2;
26, 2, 2, 26;
530, 26, 1, 26, 530;
14162, 530, 17, 17, 530, 14162;
516962, 14162, 485, 1, 485, 14162, 516962;
25391522, 516962, 13925, 325, 325, 13925, 516962, 25391522;
1625621762, 25391522, 515525, 12997, 1, 12997, 515525, 25391522, 1625621762;
MATHEMATICA
Table[((n-k)! -k!)^2 +1, {n, 0, 12}, {k, 0, n}]//Flatten (* modified by G. C. Greubel, Feb 19 2021 *)
PROG
(Sage) flatten([[(factorial(n-k) -factorial(k))^2 +1 for k in (0..n)] for n in (0..12)]) # G. C. Greubel, Feb 19 2021
(Magma) [(Factorial(n-k) -Factorial(k))^2 +1: k in [0..n], n in [0..12]]; // G. C. Greubel, Feb 19 2021
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Roger L. Bagula, Feb 19 2010
EXTENSIONS
Edited by G. C. Greubel, Feb 19 2021
STATUS
approved