[go: up one dir, main page]

login
A375524
a(n) = denominator of Sum_{i=1..n} 1/A171397(i).
3
1, 2, 6, 12, 60, 20, 140, 280, 2520, 27720, 27720, 360360, 360360, 360360, 720720, 12252240, 4084080, 77597520, 77597520, 77597520, 1784742960, 1784742960, 8923714800, 8923714800, 80313433200, 11473347600, 332727080400, 332727080400, 10314539492400, 937685408400, 937685408400
OFFSET
1,2
LINKS
EXAMPLE
The first few sums are 1, 3/2, 11/6, 25/12, 137/60, 49/20, 363/140, 761/280, 7129/2520, 80939/27720, 83249/27720, 1109957/360360, 1135697/360360, 1159721/360360, 2364487/720720, ...
MAPLE
b:= n-> (l-> add(l[i]*11^(i-1), i=1..nops(l)))(convert(n, base, 10)):
g:= proc(n) option remember; `if`(n<1, 0, g(n-1)+1/b(n)) end:
a:= n-> denom(g(n)):
seq(a(n), n=1..31); # Alois P. Heinz, Aug 30 2024
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
N. J. A. Sloane, Aug 30 2024.
STATUS
approved