login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A159285 Expansion of (1+3*x)/(1-x^2-2*x^3). 5

%I #22 Mar 23 2023 06:21:52

%S 1,3,1,5,7,7,17,21,31,55,73,117,183,263,417,629,943,1463,2201,3349,

%T 5127,7751,11825,18005,27327,41655,63337,96309,146647,222983,339265,

%U 516277,785231,1194807,1817785,2765269,4207399,6400839,9737937,14815637

%N Expansion of (1+3*x)/(1-x^2-2*x^3).

%C A floretion-generated sequence: 'i + 0.5('ij' + 'ik' + 'ji' + 'jk' + 'ki' + 'kj')

%H G. C. Greubel, <a href="/A159285/b159285.txt">Table of n, a(n) for n = 0..1000</a>

%H Creighton Dement, <a href="http://fumba.eu/sitelayout/Floretion.php">Online Floretion Multiplier</a> [broken link]

%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (0,1,2).

%F a(n) = A052947(n) + 3*A052947(n-1). - _R. J. Mathar_, Mar 23 2023

%t LinearRecurrence[{0, 1, 2}, {1, 3, 1}, 50] (* _G. C. Greubel_, Jun 27 2018 *)

%t CoefficientList[Series[(1+3x)/(1-x^2-2x^3),{x,0,40}],x] (* _Harvey P. Dale_, Jan 21 2019 *)

%o (PARI) a(n)=([0,1,0; 0,0,1; 2,1,0]^n*[1;3;1])[1,1] \\ _Charles R Greathouse IV_, Oct 03 2016

%o (Magma) I:=[1,3,1]; [n le 3 select I[n] else Self(n-2) + 2*Self(n-3): n in [1..30]]; // _G. C. Greubel_, Jun 27 2018

%Y Cf. A159284, A159286, A159287, A159288.

%K easy,nonn

%O 0,2

%A _Creighton Dement_, Apr 08 2009

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 04:13 EDT 2024. Contains 371235 sequences. (Running on oeis4.)