reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
17, 71, 161, 287, 449, 647, 881, 1151, 1457, 1799, 2177, 2591, 3041, 3527, 4049, 4607, 5201, 5831, 6497, 7199, 7937, 8711, 9521, 10367, 11249, 12167, 13121, 14111, 15137, 16199, 17297, 18431, 19601, 20807, 22049, 23327, 24641, 25991, 27377, 28799, 30257, 31751
Vincenzo Librandi, <a href="https://web.archive.org/web/20090309225914/http
From Vincenzo Librandi, Feb 08 2012: (Start)
G.f.: x*(-17 - 20*x + x^2)/(x - 1)^3. - _Vincenzo Librandi_, Feb 08 2012
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3). - _Vincenzo Librandi_, Feb 08 2012(End)
From Amiram Eldar, Mar 07 2023: (Start)
Sum_{n>=1} 1/a(n) = (1 - cot(Pi/(3*sqrt(2)))*Pi/(3*sqrt(2)))/2.
Sum_{n>=1} (-1)^(n+1)/a(n) = (cosec(Pi/(3*sqrt(2)))*Pi/(3*sqrt(2)) - 1)/2. (End)
approved
editing
(MAGMAMagma) I:=[17, 71, 161]; [n le 3 select I[n] else 3*Self(n-1)-3*Self(n-2)+1*Self(n-3): n in [1..40]]; // Vincenzo Librandi, Feb 08 2012
proposed
approved
editing
proposed
a(n) = 18*n^2 - 1.
G.f.: x*(-17 - 20*x + x^2)/(x - 1)^3. - _Vincenzo Librandi, _, Feb 08 2012
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3). - _Vincenzo Librandi, _, Feb 08 2012
(MAGMA) I:=[17, 71, 161]; [n le 3 select I[n] else 3*Self(n-1)-3*Self(n-2)+1*Self(n-3): n in [1..40]]; // _Vincenzo Librandi, _, Feb 08 2012
(PARI) for(n=1, 40, print1(18*n^2 - 1", ")); \\ _Vincenzo Librandi, _, Feb 08 2012
approved
editing
<a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,-3,1).