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-10 of 14 results. Next

A323540 a(n) = Product_{k=0..n} (k^2 + (n-k)^2).

Original entry on oeis.org

0, 1, 32, 2025, 204800, 30525625, 6307891200, 1727713080625, 606076928000000, 265058191985900625, 141409376995328000000, 90403125002859606705625, 68229510086445571768320000, 60026603304487418050791015625, 60893916244529680380723200000000
Offset: 0

Views

Author

Vaclav Kotesovec, Jan 17 2019

Keywords

Crossrefs

Cf. 2*A000330 and A006331 (with sum instead of product).

Programs

  • Magma
    m:=2; [(&*[k^m + (n-k)^m: k in [0..n]]): n in [0..20]]; // G. C. Greubel, Jan 18 2019
    
  • Mathematica
    Table[Product[k^2+(n-k)^2, {k, 0, n}], {n, 0, 20}]
  • PARI
    m=2; vector(20, n, n--; prod(k=0,n, k^m + (n-k)^m)) \\ G. C. Greubel, Jan 18 2019
    
  • Sage
    m=2; [product(k^m +(n-k)^m for k in (0..n)) for n in (0..20)] # G. C. Greubel, Jan 18 2019

Formula

a(n) ~ exp((Pi-4)*n/2) * n^(2*n+2).

A323542 a(n) = Product_{k=0..n} (k^4 + (n-k)^4).

Original entry on oeis.org

0, 1, 512, 1896129, 14101250048, 242755875390625, 7888809923487203328, 452522453429009743939201, 42521926771106843499966758912, 6212193882217859346149080691430849, 1350441156698962215630405632000000000000, 421551664651621436548685508587919503984205889
Offset: 0

Views

Author

Vaclav Kotesovec, Jan 17 2019

Keywords

Crossrefs

Cf. 2*A000538 and A259108 (with sum instead of product).

Programs

  • Magma
    [(&*[(k^4 + (n-k)^4): k in [0..n]]): n in [0..15]]; // Vincenzo Librandi, Jan 18 2019
    
  • Mathematica
    Table[Product[k^4+(n-k)^4, {k, 0, n}], {n, 0, 15}]
  • PARI
    m=4; vector(15, n, n--; prod(k=0,n, k^m + (n-k)^m)) \\ G. C. Greubel, Jan 18 2019
    
  • Sage
    m=4; [product(k^m +(n-k)^m for k in (0..n)) for n in (0..15)] # G. C. Greubel, Jan 18 2019

Formula

a(n) ~ exp((Pi*(sqrt(2) - 1/2) - 4)*n) * n^(4*n + 4).

A323546 a(n) = Product_{k=0..n} (k^8 + (n-k)^8).

Original entry on oeis.org

0, 1, 131072, 2843192875329, 94689598336441253888, 30456484467910986480712890625, 24450543078081443740165325452474318848, 74458223912158060479139869222818674648092178561, 545831702006800417886454373052629612732034857946832699392
Offset: 0

Views

Author

Vaclav Kotesovec, Jan 17 2019

Keywords

Crossrefs

Cf. 2*A000542 (with sum instead of product).

Programs

  • Mathematica
    Table[Product[k^8+(n-k)^8, {k, 0, n}], {n, 0, 10}]
  • PARI
    m=8; vector(10, n, n--; prod(k=0,n, k^m + (n-k)^m)) \\ G. C. Greubel, Jan 18 2019
    
  • Sage
    m=8; [product(k^m +(n-k)^m for k in (0..n)) for n in (0..10)] # G. C. Greubel, Jan 18 2019

Formula

a(n) ~ exp(((2*sqrt(2+sqrt(2)) - 1/2 - sqrt(2))*Pi - 8)*n) * n^(8*n+8).

A323543 a(n) = Product_{k=0..n} (k^5 + (n-k)^5).

Original entry on oeis.org

0, 1, 2048, 64304361, 3995393327104, 775913238525390625, 320224500476333990608896, 273342392644434762426370643281, 429621172463958849019228299940855808, 1175198860360296464427314161342724729270241, 5278148679274118560000000000000000000000000000000
Offset: 0

Views

Author

Vaclav Kotesovec, Jan 17 2019

Keywords

Crossrefs

Cf. 2*A000539 (with sum instead of product).

Programs

  • Magma
    [(&*[(k^5 + (n-k)^5): k in [0..n]]): n in [0..12]]; // Vincenzo Librandi, Jan 18 2019
    
  • Mathematica
    Table[Product[k^5+(n-k)^5, {k, 0, n}], {n, 0, 12}]
  • PARI
    m=5; vector(12, n, n--; prod(k=0,n, k^m +(n-k)^m)) \\ G. C. Greubel, Jan 18 2019
    
  • Sage
    m=5; [product(k^m +(n-k)^m for k in (0..n)) for n in (0..12)] # G. C. Greubel, Jan 18 2019

Formula

a(n) ~ exp((2*Pi*sqrt(5 - 2/sqrt(5))/5 - 4)*n) * n^(5*n+5).

A323544 a(n) = Product_{k=0..n} (k^6 + (n-k)^6).

Original entry on oeis.org

0, 1, 8192, 2245338225, 1144394036019200, 2577023355527587890625, 13410804447068120796679372800, 172661401915668867785003701060950625, 4548909593429214367033270472265433088000000, 234845240509381890690238640158397433600579682850625
Offset: 0

Views

Author

Vaclav Kotesovec, Jan 17 2019

Keywords

Crossrefs

Cf. 2*A000540 and A259109 (with sum instead of product).

Programs

  • Magma
    [(&*[(k^6 + (n-k)^6): k in [0..n]]): n in [0..10]]; // Vincenzo Librandi, Jan 18 2019
    
  • Mathematica
    Table[Product[k^6+(n-k)^6, {k, 0, n}], {n, 0, 10}]
  • PARI
    m=6; vector(10, n, n--; prod(k=0,n, k^m + (n-k)^m)) \\ G. C. Greubel, Jan 18 2019
    
  • Sage
    m=6; [product(k^m +(n-k)^m for k in (0..n)) for n in (0..10)] # G. C. Greubel, Jan 18 2019

Formula

a(n) ~ exp(((15 - 4*sqrt(3))*Pi/6 - 6)*n) * n^(6*n+6).

A323545 a(n) = Product_{k=0..n} (k^7 + (n-k)^7).

Original entry on oeis.org

0, 1, 32768, 79593387129, 328983774635229184, 8781626117710113525390625, 570409595340477623191338982834176, 112244673425189306235795780017831813874289, 49449149324106963036650868175987491957290049732608, 48527312221741371319651099141827554314119977393170380398241
Offset: 0

Views

Author

Vaclav Kotesovec, Jan 17 2019

Keywords

Crossrefs

Cf. 2*A000541 (with sum instead of product).

Programs

  • Magma
    m:=7; [(&*[k^m + (n-k)^m: k in [0..n]]): n in [0..10]]; // G. C. Greubel, Jan 18 2019
    
  • Mathematica
    Table[Product[k^7+(n-k)^7, {k, 0, n}], {n, 0, 10}]
  • PARI
    m=7; vector(10, n, n--; prod(k=0,n, k^m + (n-k)^m)) \\ G. C. Greubel, Jan 18 2019
    
  • Sage
    m=7; [product(k^m +(n-k)^m for k in (0..n)) for n in (0..10)] # G. C. Greubel, Jan 18 2019

Formula

a(n) ~ exp((8*cos((Pi + arctan(2769*sqrt(3)/239))/6)*Pi/sqrt(21)-6)*n) * n^(7*n+7).
Equivalently, a(n) ~ exp((4*Pi*sqrt(2*(13 + 19*sin(Pi/14) - sin(3*Pi/14))/7)/7 - 6)*n) * n^(7*n+7). - Vaclav Kotesovec, Jan 23 2019

A272246 a(n) = Product_{k=0..n} (n^3 + k^3).

Original entry on oeis.org

0, 2, 1152, 1428840, 3488808960, 15044494500000, 105235903511101440, 1119277024472896248960, 17216259547948971039129600, 368066786222106315186876633600, 10591209807103301277597696000000000, 399472472359100444604916002033020774400
Offset: 0

Views

Author

Vaclav Kotesovec, Apr 23 2016

Keywords

Crossrefs

Programs

  • Mathematica
    Table[Product[n^3+k^3,{k,0,n}],{n,0,12}]

Formula

a(n) ~ 2^(2*n + 1/2) * n^(3*n + 3) / exp((3 - Pi/sqrt(3))*n).

A320345 a(n) = Product_{k=0..n} (k^9 + (n-k)^9).

Original entry on oeis.org

0, 1, 524288, 101957062669641, 27265063485978531856384, 106913106903205778598785400390625, 1052153174824916171740710027027385486934016, 50134911460309737788263856880351450247312603708106641, 6079819706045473432785376698707222441479676085024627875693723648
Offset: 0

Views

Author

Vaclav Kotesovec, Jan 22 2019

Keywords

Crossrefs

Programs

  • Mathematica
    Table[Product[k^9+(n-k)^9, {k, 0, n}], {n, 0, 10}]

Formula

a(n) ~ exp((4*Pi*(sqrt(3) + 6*sin(Pi/9))/9 - 8)*n) * n^(9*n+9).

A323659 a(n) = Product_{k=0..n} (k^10 + (n-k)^10).

Original entry on oeis.org

0, 1, 2097152, 3663302861300625, 7851806399838625464320000, 378407193115560358680820465087890625, 45364420795826382440918950445637925790023680000, 34139918620704541898946466431984113559562219610081631390625
Offset: 0

Views

Author

Vaclav Kotesovec, Jan 23 2019

Keywords

Crossrefs

Programs

  • Mathematica
    Table[Product[k^10+(n-k)^10, {k, 0, n}], {n, 0, 10}]

Formula

a(n) ~ exp((Pi*(1/2 + 2*sqrt(5) - 2*sqrt(1 + 2/sqrt(5))) - 10)*n) * n^(10*n+10).

A323660 a(n) = Product_{k=0..n} (k^11 + (n-k)^11).

Original entry on oeis.org

0, 1, 8388608, 131750272043485209, 2261269183430619234140422144, 1346827225363533058227598667144775390625, 1957831179567376680040414825610884198366949236801536, 23448342360429805388842947812883850305932149345203144459397169329
Offset: 0

Views

Author

Vaclav Kotesovec, Jan 23 2019

Keywords

Crossrefs

Programs

  • Mathematica
    Table[Product[k^11+(n-k)^11, {k, 0, n}], {n, 0, 10}]

Formula

a(n) ~ exp((2*Pi*sqrt((1225 + 504*cos(2*Pi/11) + 1512*sin(Pi/22) - 1264*sin(3*Pi/22) + 240*sin(5*Pi/22))/11)/11 - 10)*n) * n^(11*n+11).
Showing 1-10 of 14 results. Next