|
%I #17 Mar 03 2024 09:30:18
%S 0,0,0,2,2,4,12,16,28,86,114,200,616,816,1432,4410,5842,10252,31572,
%T 41824,73396,226030,299426,525456,1618192,2143648,3761840,11584946,
%U 15346786,26931732,82938844,109870576,192809420,593775046,786584466,1380359512,4250949112
%N Even Padovan numbers.
%H <a href="/index/Rec#order_09">Index entries for linear recurrences with constant coefficients</a>, signature (0, 0, 7, 0, 0, 1, 0, 0, 1).
%F Empirical g.f.: -2*x^4*(x^4-x^3+2*x^2+x+1) / (x^9+x^6+7*x^3-1). - _Colin Barker_, Sep 17 2013
%t Select[Join[{0,0,0},LinearRecurrence[{0,1,1},{1,1,1},100]],EvenQ] (* _Harvey P. Dale_, May 11 2011 *)
%t LinearRecurrence[{0, 0, 7, 0, 0, 1, 0, 0, 1},{0, 0, 0, 2, 2, 4, 12, 16, 28},37] (* _Ray Chandler_, Mar 02 2024 *)
%Y Cf. A000931, A135619.
%K easy,nonn
%O 1,4
%A _Omar E. Pol_, Nov 11 2007
%E More terms from Harvey P. Dale, May 11 2011.
|
