A174413
Triangle T(n,m) with the denominator of 1/(n-m)^2-1/n^2, read by rows, 1<=m
4, 36, 9, 144, 16, 16, 400, 225, 100, 25, 900, 144, 12, 9, 36, 1764, 1225, 784, 441, 196, 49, 3136, 576, 1600, 64, 576, 64, 64, 5184, 3969, 324, 2025, 1296, 81, 324, 81, 8100, 1600, 4900, 225, 100, 400, 900, 25, 100, 12100, 9801, 7744, 5929, 4356, 3025, 1936, 1089, 484, 121
Offset: 2
Examples
Triangle T(n,m) begins: 4, 36, 9, 144, 16, 16, 400, 225, 100, 25, 900, 144, 12, 9, 36, 1764, 1225, 784, 441, 196, 49, 3136, 576, 1600, 64, 576, 64, 64,
Links
- Alois P. Heinz, Table of n, a(n) for n = 2..2017
Programs
-
Maple
A174413 := proc(n,m) 1/(n-m)^2-1/n^2 ; denom(%) ; end proc: seq(seq(A174413(n, k), k=1..n-1), n=2..11); # R. J. Mathar, Jan 27 2011
-
Mathematica
T[n_, m_] := Denominator[1/(n - m)^2 - 1/n^2]; Table[T[n, m], {n, 2, 11}, {m, 1, n-1}] // Flatten (* Jean-François Alcover, May 18 2018 *)
Comments