A173294 Values of 16*n^2+24*n+7, n>=0, each duplicated.
7, 7, 47, 47, 119, 119, 223, 223, 359, 359, 527, 527, 727, 727, 959, 959, 1223, 1223, 1519, 1519, 1847, 1847, 2207, 2207, 2599, 2599, 3023, 3023, 3479, 3479, 3967, 3967, 4487, 4487, 5039, 5039, 5623, 5623, 6239, 6239, 6887, 6887, 7567, 7567, 8279, 8279, 9023, 9023, 9799, 9799, 10607, 10607, 11447, 11447, 12319, 12319, 13223, 13223, 14159, 14159, 15127, 15127, 16127
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (1,2,-2,-1,1).
Programs
-
Mathematica
With[{c=16n^2+24n+7},Table[{c,c},{n,0,40}]]//Flatten (* or *) LinearRecurrence[ {1,2,-2,-1,1},{7,7,47,47,119},80] (* Harvey P. Dale, Jan 16 2019 *)
Formula
a(n) = +a(n-1) +2*a(n-2) -2*a(n-3) -a(n-4) +a(n-5).
G..f: ( -7-26*x^2+x^4 ) / ( (1+x)^2*(x-1)^3 ).
a(2n) = a(2n+1) = 16n^2+24n+7.
Comments