login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A329497
Numerator of the rational number alpha_n involved in the calculation of the second moment of the n-th term of Ulam's "history-dependent random sequence".
4
0, 2, 21, 223, 2603, 33623, 477977, 2474153, 125009419, 2268871883, 8825650861, 183051309251, 89588582779, 8538921797353, 51275872341193, 59590264767344263, 322723582109367139, 45705953681299945463, 79490015605061949133
OFFSET
1,2
LINKS
Mark Kac, A history-dependent random sequence defined by Ulam, Advances in Applied Mathematics 10.3 (1989): 270-277. See page 273, sigma_k and alpha_k.
EXAMPLE
0, 2, 21/2, 223/6, 2603/24, 33623/120, 477977/720, 2474153/1680, ...
MAPLE
s:=[1]; a:=[0];
for N from 2 to 40 do # N = n+1
n:=N-1;
t1:=s[n]+(1/n)*add(s[k], k=1..n)+2*s[n]/n+(2/n)*a[n];
t2:=s[n]+(1/n)*add(s[k], k=1..n)+a[n]+(2/n)*add(a[k], k=1..n);
s:=[op(s), t1];
a:=[op(a), t2];
od:
s; # sigma_n
a; # alpha_n
sn:=map(numer, s); # A329495
sd:=map(denom, s); # A329496
an:=map(numer, a); # A329497
ad:=map(denom, a); # A329498
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
N. J. A. Sloane, Nov 17 2019
STATUS
approved