|
%I #24 Apr 19 2023 12:39:08
%S 1,24,75,154,261,396,559,750,969,1216,1491,1794,2125,2484,2871,3286,
%T 3729,4200,4699,5226,5781,6364,6975,7614,8281,8976,9699,10450,11229,
%U 12036,12871,13734,14625,15544,16491,17466,18469,19500,20559,21646,22761,23904,25075,26274,27501,28756
%N a(n) = (2*n+1)*(7*n+1).
%C Sequence found by reading the line from 1, in the direction 1, 24,..., in the square spiral whose vertices are the generalized enneagonal numbers A118277. Also sequence found by reading the same line in the square spiral whose edges have length A195019 and whose vertices are the numbers A195020. - _Omar E. Pol_, Sep 13 2011
%H G. C. Greubel, <a href="/A033572/b033572.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) = a(n-1) + 28*n - 5 for n>0, a(0)=1. - _Vincenzo Librandi_, Nov 17 2010
%F From _G. C. Greubel_, Oct 12 2019: (Start)
%F G.f.: (1 + 21*x + 6*x^2)/(1-x)^3.
%F E.g.f.: (1 + 23*x + 14*x^2)*exp(x). (End)
%p seq((2*n+1)*(7*n+1), n=0..50); # _G. C. Greubel_, Oct 12 2019
%t Table[(2*n+1)*(7*n+1), {n, 0, 50}] (* _G. C. Greubel_, Oct 12 2019 *)
%t LinearRecurrence[{3,-3,1},{1,24,75},50] (* _Harvey P. Dale_, Apr 19 2023 *)
%o (PARI) a(n)=(2*n+1)*(7*n+1) \\ _Charles R Greathouse IV_, Jun 17 2017
%o (Magma) [(2*n+1)*(7*n+1): n in [0..50]] # _G. C. Greubel_, Oct 12 2019
%o (Sage) [(2*n+1)*(7*n+1) for n in range(50)] # _G. C. Greubel_, Oct 12 2019
%o (GAP) List([0..50], n-> (2*n+1)*(7*n+1)); # _G. C. Greubel_, Oct 12 2019
%Y Bisection of A001106.
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_
%E Terms a(35) onward added by _G. C. Greubel_, Oct 12 2019
|
