|
|
A321397
|
|
a is the limit of A321396.
|
|
2
|
|
|
0, 1, 0, 1, 1, 3, 3, 10, 10, 32, 37, 105, 131, 364, 464, 1269, 1690, 4478, 6163, 16070, 22582, 58197, 83431, 212337, 309890, 780706, 1155906, 2888189, 4331109, 10739640, 16291293, 40123020, 61483211, 150518418, 232754753, 566704138, 883597884, 2140614523
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,6
|
|
COMMENTS
|
The sequence a is the limit of the square array A321396 means, that for every fixed k the terms in column k of A321396 differ from a(k) only for finitely many indices.
|
|
LINKS
|
|
|
MATHEMATICA
|
terms = 38; gf[-1] = 1; gf[n_] := gf[n] = (1-Sqrt[1-4z^2 gf[n -1]])/(2z);
row[n_] := row[n] = gf[n]/z^n + O[z]^terms // CoefficientList[#, z]&;
row[n = 1]; row[n++]; While[Print[n]; row[n] != row[n-1], n++];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|