A084518 Partial sums of A084519. Positions of ones in the first differences of A084516.
1, 2, 5, 18, 65, 238, 877, 3234, 11929, 44006, 162341, 598890, 2209361, 8150542, 30068125, 110924178, 409209865, 1509614198, 5569110677, 20544980154, 75792390209, 279605352286, 1031490797581, 3805267877730, 14037995932921
Offset: 1
Keywords
Links
- Index entries for linear recurrences with constant coefficients, signature (3, 2, 2).
Programs
-
Mathematica
Accumulate[LinearRecurrence[{3,2,2},{1,1,3},30]] (* Harvey P. Dale, Jul 20 2013 *)
Formula
Empirical G.f.: x*(1-2*x-2*x^2)/((1-x)*(1-3*x-2*x^2-2*x^3)). [Colin Barker, Apr 17 2012]