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-3 of 3 results.

A060114 Least common multiple of all cycle sizes in range [A014137(n-1)..A014138(n-1)] of permutation A057505/A057506.

Original entry on oeis.org

1, 1, 2, 6, 6, 30, 120, 720, 15120, 1164240, 15135120, 283931716867999200, 14510088480716327580681600, 3280681990411073806237542217555200, 936436634805345771521186435213604447980767985241556128000
Offset: 0

Views

Author

Antti Karttunen, Mar 01 2001

Keywords

Comments

For the convenience of the range notation above, we define A014137(-1) and A014138(-1) as zero.
This sequence grows so fast that it seems hopeless to count A057507 with Burnside's (orbit-counting) lemma.

Crossrefs

Occurs for first time in A073204 as row 2614.

A051575 a(n) = LCM { Catalan(0), ..., Catalan(n) }.

Original entry on oeis.org

1, 1, 2, 10, 70, 210, 4620, 60060, 60060, 1021020, 19399380, 19399380, 446185740, 2230928700, 13385572200, 388181593800, 12033629407800, 12033629407800, 12033629407800, 445244288088600, 445244288088600, 18255015811632600
Offset: 0

Views

Author

Keywords

Crossrefs

Programs

  • Mathematica
    LCM@@@CatalanNumber@Range[0, Range[0, 20]] (* Vladimir Reshetnikov, Nov 17 2015 *)
  • PARI
    a(n) = if(n>1, lcm(a(n-1), binomial(2*n, n)/(n+1)), 1) \\ David A. Corneth, Aug 23 2016

A180402 a(n) = lcm(1,...,Fibonacci(n)).

Original entry on oeis.org

1, 1, 2, 6, 60, 840, 360360, 232792560, 144403552893600, 164249358725037825439200, 718766754945489455304472257065075294400, 33312720618553145840562713089120360606823375590405920630576000
Offset: 1

Views

Author

Vaclav Kotesovec, Sep 02 2010

Keywords

Comments

Also least period for number of ways of placing k non-attacking queens on an n X n chessboard. [conjectured by Kotesovec; proved for n <= 5. - Thomas Zaslavsky, Jun 24 2018]

Crossrefs

Programs

  • Maple
    a:= n-> ilcm($1..(<<0|1>, <1|1>>^n)[1,2]):
    seq(a(n), n=1..14);  # Alois P. Heinz, Aug 12 2017
  • Mathematica
    Table[Apply[LCM, Range[Fibonacci[k]]], {k, 1, 10}]
    Array[LCM @@ Range@Fibonacci@# &, 12] (* Robert G. Wilson v, Sep 05 2010 *)
  • PARI
    a(n) = lcm([1..fibonacci(n)]); \\ Michel Marcus, Jun 24 2018

Extensions

a(11) onwards from Robert G. Wilson v, Sep 05 2010
Showing 1-3 of 3 results.