[go: up one dir, main page]

login
A014730
Squares of odd Lucas numbers.
1
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
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
Sequence in context: A339125 A016838 A087691 * A212503 A295019 A164343
KEYWORD
nonn,easy
EXTENSIONS
More terms from Colin Barker, May 14 2014
STATUS
approved