A374335 a(n) is the denominator of x(n) = (16*x(n-1) + (120*n^2 - 89*n + 16)/(512*n^4 - 1024*n^3 + 712*n^2 - 206*n + 21)) mod 1, with x(0) = 0.

1, 15, 4095, 765765, 111035925, 78058255275, 24536311574775, 81926744348173725, 154923473562396513975, 154923473562396513975, 595232293160786606325, 76784965817741472215925, 321191512015612578279214275, 3146713243216956429401462252175, 342991743510648250804759385487075

Offset

0,2

Comments

See A374334 for details and links.

Links

Paolo Xausa, Table of n, a(n) for n = 0..375

Mathematica

Block[{n = 0}, Denominator[NestList[Mod[16*# + (120*(++n)^2 - 89*n + 16)/(512*n^4 - 1024*n^3 + 712*n^2 - 206*n + 21), 1] &, 0, 20]]]

Crossrefs

Cf. A374333, A374334 (numerators), A374581, A374608.

Sequence in context: A198524 A208463 A374796 * A172322 A139297 A211251

Adjacent sequences: A374332 A374333 A374334 * A374336 A374337 A374338

Keyword

nonn,frac,new

Author

Paolo Xausa, Jul 06 2024

Status

approved