[seqfan] Re: Cute interpretation of A002294

[brad klee]

> I can't see this mentioned anywhere in the A002294 entry, but perhaps
> I'm being blind...

There's working Mathematica code, which differs from your proposal by 
a sign: 

CoefficientList[InverseSeries[
Series[y - y^5, {y, 0, 100}],
 x], x][[Range[2, 100, 4]]] 

Out[] ={1, 1, 5, 35, 285, 2530, . . . }

Changing the sign on y^5 term in the first argument of Series introduces
an alternating sign pattern in the output list of integers. 

--Brad