A070262 -id:A070262 - cp's OEIS frontend

A051537 Triangle read by rows: T(i,j) = lcm(i,j)/gcd(i,j) for 1 <= j <= i.

1, 2, 1, 3, 6, 1, 4, 2, 12, 1, 5, 10, 15, 20, 1, 6, 3, 2, 6, 30, 1, 7, 14, 21, 28, 35, 42, 1, 8, 4, 24, 2, 40, 12, 56, 1, 9, 18, 3, 36, 45, 6, 63, 72, 1, 10, 5, 30, 10, 2, 15, 70, 20, 90, 1, 11, 22, 33, 44, 55, 66, 77, 88, 99, 110, 1, 12, 6, 4, 3, 60, 2, 84, 6, 12, 30, 132, 1, 13, 26, 39

Offset: 1

N. J. A. Sloane and Amarnath Murthy, May 10 2002

From  Robert G. Wilson v, May 10 2002: (Start)
The first term of the k-th row is k. The first leading diagonal contains all 1's. The second leading diagonal contains twice the triangular numbers = n*(n-1).
For p prime, the sum of the p-th row is (p^3 - p^2 + 2)/2.
Proof: The p-th row is p, 2*p, 3*p, ..., (p-2)*p, (p-1)*p, 1. The sum of the row = p*(1 + 2 + 3 + ... + (p-2) + (p-1)) + 1 = p*(p-1)*p/2 + 1 = (p^3 - p^2 + 2)/2. (End) [Edited by Petros Hadjicostas, May 27 2020]
In the square array where T(i,j) = T(j,i), the natural extension of the triangle, each set of rows and columns with common indices [d1, d2, ..., ds] define a group multiplication table on their grid, if the d1, d2, ..., ds are the set of divisors of a squarefree number [A. Jorza]. - R. J. Mathar, May 03 2007
T(n,k) is the minimum number of squares necessary to fill a rectangle with sides of length n and k. - Stefano Spezia, Oct 06 2018

			Triangle T(n,k) (with rows n >= 1 and columns k = 1..n) begins
  1;
  2,  1;
  3,  6,  1;
  4,  2, 12,  1;
  5, 10, 15, 20,  1;
  6,  3,  2,  6, 30,  1;
  7, 14, 21, 28, 35, 42,  1;
  8,  4, 24,  2, 40, 12, 56,  1;
  ...

Reinhard Zumkeller, Rows n = 1..120 of triangle, flattened
Andrei Jorza, Groups of Divisors: Solution to problem 10893, Amer. Math. Monthly, 2003, 441-443.

Diagonals give A002378, A070260, A070261, A070262.

Row sums give A056789.

Flat(List([1..13],n->List([1..n],k->Lcm(n,k)/Gcd(n,k)))); # Muniru A Asiru, Oct 06 2018

a051537 n k = a051537_tabl !! (n-1) !! (k-1)
a051537_row n = a051537_tabl !! (n-1)
a051537_tabl = zipWith (zipWith div) a051173_tabl a050873_tabl
-- Reinhard Zumkeller, Jul 07 2013

/* As triangle */ [[Lcm(n,k)/Gcd(n,k): k in [1..n]]: n in [1.. 15]]; // Vincenzo Librandi, Oct 07 2018

T:=proc(n,k) n*k/gcd(n,k)^2; end proc: seq(seq(T(n,k),k=1..n),n=1..13); # Muniru A Asiru, Oct 06 2018

Flatten[ Table[ LCM[i, j] / GCD[i, j], {i, 1, 13}, {j, 1, i}]]
T[n_,k_]:=n*k/GCD[n,k]^2; Flatten[Table[T[n,k],{k,1,13},{n,1,k}]] (* Stefano Spezia, Oct 06 2018 *)

T(n,k) = A054531(n,k)*A164306(n,k). - Reinhard Zumkeller, Oct 30 2009
T(n,k) = A051173(n,k) / A050873(n,k). - Reinhard Zumkeller, Jul 07 2013
T(n,k) = n*k/gcd(n,k)^2. - Stefano Spezia, Oct 06 2018

More terms from Robert G. Wilson v, May 10 2002

A172157 Triangle T(n,m) = numerator of 1/n^2 - 1/m^2, read by rows, with T(n,0) = -1.

Original entry on oeis.org

-1, -1, -3, -1, -8, -5, -1, -15, -3, -7, -1, -24, -21, -16, -9, -1, -35, -2, -1, -5, -11, -1, -48, -45, -40, -33, -24, -13, -1, -63, -15, -55, -3, -39, -7, -15, -1, -80, -77, -8, -65, -56, -5, -32, -17, -1, -99, -6, -91, -21, -3, -4, -51, -9, -19, -1, -120, -117, -112

Offset: 1

Paul Curtz, Jan 27 2010

The triangle obtained by negating the values of the triangle A120072 and adding a row T(n,0) = -1.

			The full array of numerators starts in row n=1 with columns m>=0 as:
-1...0...3...8..15..24..35..48..63..80..99. A005563
-1..-3...0...5...3..21...2..45..15..77...6. A061037, A070262
-1..-8..-5...0...7..16...1..40..55...8..91. A061039
-1.-15..-3..-7...0...9...5..33...3..65..21. A061041
-1.-24.-21.-16..-9...0..11..24..39..56...3. A061043
-1.-35..-2..-1..-5.-11...0..13...7...5...4. A061045
-1.-48.-45.-40.-33.-24.-13...0..15..32..51. A061047
-1.-63.-15.-55..-3.-39..-7.-15...0..17...9. A061049
The triangle is the portion below the main diagonal, left from the zeros, 0<=m<n.

G. C. Greubel, Rows n=1..100 of triangle, flattened

Cf. A172370, A174233, A165795.

T[n_, 0] := -1; T[n_, k_] := 1/n^2 - 1/k^2; Table[Numerator[T[n, k]], {n, 1, 100}, {k, 0, n - 1}] // Flatten (* G. C. Greubel, Sep 19 2018 *)

A172370 Mirrored triangle A120072 read by rows.

Original entry on oeis.org

3, 5, 8, 7, 3, 15, 9, 16, 21, 24, 11, 5, 1, 2, 35, 13, 24, 33, 40, 45, 48, 15, 7, 39, 3, 55, 15, 63, 17, 32, 5, 56, 65, 8, 77, 80, 19, 9, 51, 4, 3, 21, 91, 6, 99, 21, 40, 57, 72, 85, 96, 105, 112, 117, 120, 23, 11, 7, 5, 95, 1, 119, 1, 5, 35, 143, 25, 48, 69, 88, 105, 120, 133, 144

Offset: 2

Paul Curtz, Feb 01 2010

A table of numerators of 1/n^2 - 1/m^2 extended to negative m looks as follows, stacked such that values of common m are aligned
and the central column of -1 is defined for m=0:
.............................0..-1...0...3...8..15..24..35..48..63..80..99. A005563
.........................0..-3..-1..-3...0...5...3..21...2..45..15..77...6. A061037
.....................0..-5..-8..-1..-8..-5...0...7..16...1..40..55...8..91. A061039
.................0..-7..-3.-15..-1.-15..-3..-7...0...9...5..33...3..65..21. A061041
.............0..-9.-16.-21.-24..-1.-24.-21.-16..-9...0..11..24..39..56...3. A061043
.........0.-11..-5..-1..-2.-35..-1.-35..-2..-1..-5.-11...0..13...7...5...4. A061045
.....0.-13.-24.-33.-40.-45.-48..-1.-48.-45.-40.-33.-24.-13...0..15..32..51. A061047
.0.-15..-7.-39..-3.-55.-15.-63..-1.-63.-15.-55..-3.-39..-7.-15...0..17...9. A061049
The row-reversed variant of A120072 appears (negated) after the leftmost 0.
Equals A061035 with the first column removed. - Georg Fischer, Jul 26 2023

			The table starts
   3
   5   8
   7   3  15
   9  16  21  24
  11   5   1   2  35
  13  24  33  40  45  48
  15   7  39   3  55  15  63
  17  32   5  56  65   8  77  80
  19   9  51   4   3  21  91   6  99

G. C. Greubel, Rows n = 2..100 of triangle, flattened

Lower diagonal gives: A070262, A061037(n+2).

Cf. A061035, A172157, A165795.

[[Numerator(1/(n-k)^2 -1/n^2): k in [1..n-1]]: n in [2..20]]; // G. C. Greubel, Sep 20 2018

Table[Numerator[1/(n-k)^2 -1/n^2], {n, 2, 20}, {k, 1, n-1}]//Flatten (* G. C. Greubel, Sep 20 2018 *)

for(n=2,20, for(k=1,n-1, print1(numerator(1/(n-k)^2 -1/n^2), ", "))) \\ G. C. Greubel, Sep 20 2018

T(n,m) = numerator of 1/(n-m)^2 - 1/n^2, n >= 2, 1 <= m < n. - R. J. Mathar, Nov 23 2010

Comment rewritten and offset set to 2 by R. J. Mathar, Nov 23 2010

A165795 Array A(n, k) = numerator of 1/n^2 - 1/k^2 with A(0,k) = 1 and A(n,0) = -1, read by antidiagonals.

Original entry on oeis.org

1, -1, 1, -1, 0, 1, -1, -3, 3, 1, -1, -8, 0, 8, 1, -1, -15, -5, 5, 15, 1, -1, -24, -3, 0, 3, 24, 1, -1, -35, -21, -7, 7, 21, 35, 1, -1, -48, -2, -16, 0, 16, 2, 48, 1, -1, -63, -45, -1, -9, 9, 1, 45, 63, 1, -1, -80, -15, -40, -5, 0, 5, 40, 15, 80, 1, -1, -99, -77, -55, -33, -11, 11, 33, 55, 77, 99, 1

Offset: 0

Paul Curtz, Sep 27 2009

A row of A(0,k)= 1 is added on top of the array shown in A172157, which is then read upwards by antidiagonals.

One may also interpret this as appending a 1 to each row of A173651 or adding a column of -1's and a diagonal of +1's to A165507.

			The array, A(n, k), of numerators starts in row n=0 with columns m>=0 as:
  .1...1...1...1...1...1...1...1...1...1...1.
  -1...0...3...8..15..24..35..48..63..80..99. A005563, A147998
  -1..-3...0...5...3..21...2..45..15..77...6. A061037, A070262
  -1..-8..-5...0...7..16...1..40..55...8..91. A061039
Antidiagonal triangle, T(n, k), begins as:
   1;
  -1,   1;
  -1,   0,   1;
  -1,  -3,   3,  1;
  -1,  -8,   0,  8,  1;
  -1, -15,  -5,  5, 15,  1;
  -1, -24,  -3,  0,  3, 24,  1;
  -1, -35, -21, -7,  7, 21, 35, 1;

G. C. Greubel, Antidiagonals n = 0..50, flattened

Cf. A158388, A165507, A172157, A173651.

Cf. A005408, A005563, A061037, A061039, A070262, A147998.

T[n_, k_]:= If[k==n, 1, If[k==0, -1, Numerator[1/(n-k)^2 - 1/k^2]]];
Table[T[n, k], {n,0,12}, {k,0,n}]//Flatten (* G. C. Greubel, Mar 10 2022 *)

def A165795(n,k):
    if (k==n): return 1
    elif (k==0): return -1
    else: return numerator(1/(n-k)^2 -1/k^2)
flatten([[A165795(n,k) for k in (0..n)] for n in (0..12)]) # G. C. Greubel, Mar 10 2022

A(n, k) = numerator(1/n^2 - 1/k^2) with A(0,k) = 1 and A(n,0) = -1 (array).
A(n, 0) = -A158388(n).
A(n, k) = A172157(n,k), n>=1.
From G. C. Greubel, Mar 10 2022: (Start)
T(n, k) = numerator(1/(n-k)^2 -1/k^2), with T(n,n) = 1, T(n,0) = -1 (triangle).
A(n, n) = T(2*n, n) = 0^n.
Sum_{k=0..n} T(n, k) = 0^n.
T(n, n-k) = -T(n,k).
T(2*n+1, n) = -A005408(n). (End)

cp's OEIS Frontend

A051537 Triangle read by rows: T(i,j) = lcm(i,j)/gcd(i,j) for 1 <= j <= i.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

GAP

Haskell

Magma

Maple

Mathematica

Formula

Extensions

A172157 Triangle T(n,m) = numerator of 1/n^2 - 1/m^2, read by rows, with T(n,0) = -1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A172370 Mirrored triangle A120072 read by rows.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Magma

Mathematica

PARI

Formula

Extensions

A165795 Array A(n, k) = numerator of 1/n^2 - 1/k^2 with A(0,k) = 1 and A(n,0) = -1, read by antidiagonals.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Sage

Formula