|
%I #10 Jul 31 2015 12:05:58
%S 1,4,16,64,253,1000,3952,15616,61705,243820,963424,3806848,15042277,
%T 59437648,234860320,928020736,3666956113,14489511508,57253465072,
%U 226229798080,893918323981,3532204761400,13957058650384,55149545207296,217916425857241,861069089144764
%N Expansion of (1-x)^(-1)/(1-3*x-3*x^2-3*x^3).
%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (4, 0, 0, -3).
%F a(0)=1, a(1)=4, a(2)=16, a(3)=64, a(n)=4*a(n-1)-3*a(n-4) [From Harvey P. Dale, May 10 2011]
%t LinearRecurrence[{4,0,0,-3},{1,4,16,64},40] (* or *) CoefficientList[ Series[(1-x)^(-1)/(1-3x-3x^2-3x^3),{x,0,40}],x] (* _Harvey P. Dale_, May 10 2011 *)
%K nonn
%O 0,2
%A _N. J. A. Sloane_, Nov 17 2002
|
