|
|
|
|
1, 23, 416, 7344, 134613, 2620379, 54636792, 1223392968, 29409134545, 757686550455, 20870680635528, 612964613117960, 19140704352872949, 633710701752022635, 22185391759982205904, 819180275431111135536, 31826528430233802890049, 1298154677953792936043447, 55473817874169725876166480
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
2,2
|
|
LINKS
|
|
|
PROG
|
(PARI)
my(x='x+O('x^N), y0=1+O('x^N), y1=0, n=1);
while(n++,
y1 = (1 + x*y0 + 2*x^2*y0')*(1 - x*y0*(1-t))/(1-x*y0)^2;
if (y1 == y0, break()); y0 = y1; );
y0;
};
Kol(K, N=20) = {
my(s = A286781_ser(N+K, 't+O('t^(K+1))));
vector(N, n, polcoeff(polcoeff(s, K+n-1), K));
};
Kol(2)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|