login
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
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.
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++];
A321397 = row[n] (* Jean-François Alcover, Dec 08 2018 *)
CROSSREFS
Cf. A321396.
Sequence in context: A073709 A085288 A124630 * A128015 A233256 A332955
KEYWORD
nonn
AUTHOR
Peter Luschny, Nov 11 2018
STATUS
approved