cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-2 of 2 results.

A340560 Square array T(n,k), n >= 1, k >= 1, read by antidiagonals, where T(n,k) = Product_{a=1..n-1} Product_{b=1..k-1} (4*sin(a*Pi/n)^2 + 4*sin(b*Pi/k)^2).

Original entry on oeis.org

1, 1, 1, 1, 8, 1, 1, 49, 49, 1, 1, 288, 1296, 288, 1, 1, 1681, 30625, 30625, 1681, 1, 1, 9800, 707281, 2654208, 707281, 9800, 1, 1, 57121, 16257024, 219069601, 219069601, 16257024, 57121, 1, 1, 332928, 373301041, 17860500000, 62500000000, 17860500000, 373301041, 332928, 1
Offset: 1

Views

Author

Seiichi Manyama, Jan 11 2021

Keywords

Examples

			Square array begins:
  1,    1,      1,         1,           1, ...
  1,    8,     49,       288,        1681, ...
  1,   49,   1296,     30625,      707281, ...
  1,  288,  30625,   2654208,   219069601, ...
  1, 1681, 707281, 219069601, 62500000000, ...
		

Crossrefs

Rows and columns 1..2 give A000012, A001108.
Main diagonal gives A340562.

Programs

  • PARI
    default(realprecision, 120);
    {T(n, k) = round(prod(a=1, n-1, prod(b=1, k-1, 4*sin(a*Pi/n)^2+4*sin(b*Pi/k)^2)))}

Formula

T(n,k) = T(k,n).
T(n,k) = A212796(n,k)/(n*k).

A340563 a(n) = sqrt( Product_{1<=j, k<=n-1} (4*sin(j*Pi/n)^2 + 4*cos(k*Pi/n)^2) ).

Original entry on oeis.org

1, 1, 2, 16, 384, 30976, 7741440, 6369316864, 16435095011328, 138915523039657984, 3696387867279360000000, 321533678904455375050768384, 88192375153215003517412966400000, 78996127242669742603293261855977373696, 223311937686075869460797609709638544686841856
Offset: 0

Views

Author

Seiichi Manyama, Jan 11 2021

Keywords

Crossrefs

Main diagonal of A340561.

Programs

  • Mathematica
    Table[Sqrt[Product[Product[(4*Sin[j*Pi/n]^2 + 4*Cos[k*Pi/n]^2), {j, 1, n - 1}], {k, 1, n - 1}]], {n, 0, 15}] // Round (* Vaclav Kotesovec, Mar 18 2023 *)
  • PARI
    default(realprecision, 120);
    {a(n) = round(sqrt(prod(j=1, n-1, prod(k=1, n-1, 4*sin(j*Pi/n)^2+4*cos(k*Pi/n)^2))))}

Formula

a(n) ~ c * (sqrt(2) - 1)^n * exp(2*G*n^2/Pi), where c = sqrt(Pi) / Gamma(3/4)^2 if n is even and c = 2^(1/4) if n is odd, G is Catalan's constant A006752. - Vaclav Kotesovec, Mar 18 2023
Showing 1-2 of 2 results.