|
%I #27 Sep 08 2022 08:45:29
%S 12,3,-4,-9,-12,-13,-12,-9,-4,3,12,23,36,51,68,87,108,131,156,183,212,
%T 243,276,311,348,387,428,471,516,563,612,663,716,771,828,887,948,1011,
%U 1076,1143,1212,1283,1356,1431,1508,1587,1668,1751,1836,1923,2012,2103,2196,2291
%N Q(n,4), where Q(m,k) is defined in A127080 and A127137.
%D V. van der Noort and N. J. A. Sloane, Paper in preparation, 2007.
%H G. C. Greubel, <a href="/A127146/b127146.txt">Table of n, a(n) for n = 0..1000</a>
%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,-3,1).
%F a(n) = n^2 - 10*n + 12.
%F a(n) = a(n-1) + 2*n - 11, with a(0)=12. - _Vincenzo Librandi_, Nov 23 2010
%F G.f.: (12 - 33*x + 23*x^2)/(1 - x)^3. - _Harvey P. Dale_, Apr 02 2011
%F E.g.f.: (12 - 9*x + x^2)*exp(x). - _G. C. Greubel_, Aug 25 2019
%p seq((n-5)^2 -13, n=0..60); # _G. C. Greubel_, Aug 25 2019
%t Table[n^2-10n+12,{n,0,60}] (* _Harvey P. Dale_, Apr 02 2011 *)
%t Range[-5, 55]^2 - 13 (* _G. C. Greubel_, Aug 25 2019 *)
%o (Sage) [lucas_number2(2,n,6-n) for n in range(-6,48)] # _Zerinvary Lajos_, Mar 12 2009
%o (PARI) a(n)=n^2-10*n+12 \\ _Charles R Greathouse IV_, Jun 17 2017
%o (Magma) [(n-5)^2 -13: n in [0..60]]; // _G. C. Greubel_, Aug 25 2019
%o (GAP) List([0..60], n-> (n-5)^2 -13); # _G. C. Greubel_, Aug 25 2019
%Y A row of A127080.
%K sign,easy
%O 0,1
%A _N. J. A. Sloane_, Mar 24 2007
|
