login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A245799 Lucas(3*n) - Fibonacci(n). 1
2, 3, 17, 74, 319, 1359, 5770, 24463, 103661, 439170, 1860443, 7881107, 33385138, 141422091, 599074201, 2537720026, 10749956135, 45537547527, 192900151034, 817138159415, 3461452801237, 14662949384658, 62113250372707, 263115950928619, 1114577054173154 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 0..200

FORMULA

G.f.: (2 - 7*x + 6*x^2 + 5*x^3)/((1 - x - x^2)(1 - 4*x - x^2)).

MATHEMATICA

Table[LucasL[3 n] - Fibonacci[n], {n, 0, 30}] (* or *) CoefficientList[Series[(2 - 7 x + 6 x^2 + 5 x^3)/((1 - x - x^2) (1 - 4 x - x^2)), {x, 0, 40}], x]

PROG

(MAGMA) [Lucas(3*n) - Fibonacci(n): n in [0..30]];

(Python)

import sympy

{print(sympy.lucas(3*n)-sympy.fibonacci(n), end=', ') for n in range(50)}

# Derek Orr, Aug 02 2014

CROSSREFS

Cf. A000032, A000045, A005248, A014448.

Sequence in context: A055739 A220703 A342547 * A056794 A135726 A164816

Adjacent sequences:  A245796 A245797 A245798 * A245800 A245801 A245802

KEYWORD

nonn,easy

AUTHOR

Vincenzo Librandi, Aug 02 2014

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 7 08:12 EDT 2021. Contains 343636 sequences. (Running on oeis4.)