[go: up one dir, main page]

login
A357582
a(n) = A061300(n+1)/A061300(n).
1
1, 2, 6, 30, 154, 1105, 4788, 20677, 216931, 858925, 7105392, 5546059, 2018025900, 1480452337, 3238556831, 107972737, 18425956230000, 4683032671, 14053747110612300, 160436746661, 33809725025123, 15260431896321667, 1583855315457687090000
OFFSET
0,2
COMMENTS
It is not known if the ratios A061300(n+1)/A061300(n) are always integer, but so far (for the listed terms) they are. - Max Alekseyev, Sep 05 2023
LINKS
EXAMPLE
a(5) = 1105 as A061300(5+1) / A061300(5) = 61261200 / 55440 = 1105.
MATHEMATICA
A061300[n_Integer?NonNegative] := A061300[n] = Module[{fact = n!, num = 1}, Monitor[While[Length@Divisors@num != fact, num++]; num, {n, num}]]; a[n_] := A061300[n + 1]/A061300[n]; Table[a[n], {n, 0, 4}] (* Robert P. P. McKone, Sep 07 2023 *)
CROSSREFS
Cf. A061300.
Sequence in context: A362696 A327927 A192446 * A218940 A005432 A009422
KEYWORD
nonn,hard
AUTHOR
J. Lowell, Oct 04 2022
EXTENSIONS
a(11)-a(21) from David A. Corneth, Oct 05 2022
a(22)-a(29) from Max Alekseyev, Sep 05 2023
STATUS
approved