OFFSET
0,2
MATHEMATICA
F[n_] := Expand[(1+(1+x)(1+y) + (1+1/x)(1+1/y) + (1+1/x^2)(1+1/y^2))^n];
a[n_] := SeriesCoefficient[F[n], {x, 0, 0}, {y, 0, 0}]; a /@ Range[0, 20]
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, Oct 28 2019
STATUS
approved