A014730 Squares of odd Lucas numbers.

1, 9, 49, 121, 841, 2209, 15129, 39601, 271441, 710649, 4870849, 12752041, 87403801, 228826129, 1568397609, 4106118241, 28143753121, 73681302249, 505019158609, 1322157322201, 9062201101801, 23725150497409, 162614600673849, 425730551631121, 2918000611027441

Offset

0,2

Links

Harvey P. Dale, Table of n, a(n) for n = 0..1594

Index entries for linear recurrences with constant coefficients, signature (0,17,0,17,0,-1).

Formula

a(n) = 17*a(n-2)+17*a(n-4)-a(n-6). - R. J. Mathar, Feb 10 2012

G.f.: -(x-1)*(x^4+10*x^3+42*x^2+10*x+1) / ((x^2-4*x-1)*(x^2+1)*(x^2+4*x-1)). - Colin Barker, May 14 2014

Mathematica

Select[LucasL[Range[50]], OddQ]^2 (* Harvey P. Dale, Nov 13 2021 *)

Prog

(PARI) Vec(-(x-1)*(x^4+10*x^3+42*x^2+10*x+1)/((x^2-4*x-1)*(x^2+1)*(x^2+4*x-1)) + O(x^100)) \\ Colin Barker, May 14 2014

Crossrefs

Cf. A014447, A081069.

Sequence in context: A339125 A016838 A087691 * A212503 A295019 A164343

Adjacent sequences: A014727 A014728 A014729 * A014731 A014732 A014733

Keyword

nonn,easy

Author

Mohammad K. Azarian

Extensions

More terms from Colin Barker, May 14 2014

Status

approved