%I #20 Sep 08 2022 08:45:45
%S 1,29,57,85,113,141,169,197,225,253,281,309,337,365,393,421,449,477,
%T 505,533,561,589,617,645,673,701,729,757,785,813,841,869,897,925,953,
%U 981,1009,1037,1065,1093,1121,1149,1177,1205,1233,1261,1289,1317,1345,1373
%N a(n) = 28*n + 1.
%H Vincenzo Librandi, <a href="/A161714/b161714.txt">Table of n, a(n) for n = 0..5000</a>
%H <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (2,-1).
%F G.f.: (1 + 27*x)/(1-x)^2. - _Indranil Ghosh_, Apr 05 2017
%F E.g.f.: (1 + 28*x)*exp(x). - _G. C. Greubel_, Sep 18 2019
%p seq(1+28*n, n=0..60); # _G. C. Greubel_, Sep 18 2019
%t Range[1, 1700, 28] (* _Vladimir Joseph Stephan Orlovsky_, Jun 15 2011 *)
%t CoefficientList[Series[(1+27x)/(1-x)^2, {x,0,60}], x] (* _Michael De Vlieger_, Apr 05 2017 *)
%o (Magma) [28*n + 1: n in [0..60]]; // _Vincenzo Librandi_, May 04 2011
%o (PARI) vector(60, n, 28*n-27) \\ _G. C. Greubel_, Sep 18 2019
%o (Sage) [1+28*n for n in (0..60)] # _G. C. Greubel_, Sep 18 2019
%o (GAP) List([0..60], n-> 1+28*n); # _G. C. Greubel_, Sep 18 2019
%Y Cf. A005408, A016813, A016921, A017281, A017533, A128470, A158057, A161700, A161705, A161709.
%K nonn,easy
%O 0,2
%A _Reinhard Zumkeller_, Jun 17 2009