This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A272399 #22 Nov 08 2024 10:53:47 %S A272399 1,28,91,190,325,496,703,946,1225,1540,1891,2278,2701,3160,3655,4186, %T A272399 4753,5356,5995,6670,7381,8128,8911,9730,10585,11476,12403,13366, %U A272399 14365,15400,16471,17578,18721,19900,21115,22366,23653,24976,26335,27730,29161,30628 %N A272399 The intersection of hexagonal numbers (A000384) and centered 9-gonal numbers (A060544). %H A272399 Colin Barker, <a href="/A272399/b272399.txt">Table of n, a(n) for n = 1..1000</a> %H A272399 <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,-3,1). %F A272399 a(n) = A272398(4*n-3). %F A272399 a(n) = 10-27*n+18*n^2. %F A272399 a(n) = 3*a(n-1)-3*a(n-2)+a(n-3) for n>3. %F A272399 G.f.: x*(1+25*x+10*x^2) / (1-x)^3. %F A272399 a(n) = A000384(3*n-2) = A060544(2*n-1). - _Robert Israel_, Apr 28 2016 %F A272399 E.g.f.: (9*x*(2*x - 1) + 10)*exp(x) - 10. - _Ilya Gutkovskiy_, Apr 28 2016 %t A272399 Rest@ CoefficientList[Series[x (1 + 25 x + 10 x^2)/(1 - x)^3, {x, 0, 42}], x] (* _Michael De Vlieger_, Apr 28 2016 *) %t A272399 LinearRecurrence[{3,-3,1},{1,28,91},50] (* _Harvey P. Dale_, Nov 08 2024 *) %o A272399 (PARI) lista(nn) = for(n=1, nn, print1(10-27*n+18*n^2, ", ")); \\ _Altug Alkan_, Apr 28 2016 %o A272399 (PARI) a(n)=18*n^2-27*n+10 \\ _Charles R Greathouse IV_, Apr 28 2016 %o A272399 (PARI) Vec(x*(1+25*x+10*x^2) / (1-x)^3 + O(x^50)) \\ _Colin Barker_, Apr 29 2016 %Y A272399 Cf. A000384, A060544, A272398 (union). %K A272399 nonn,easy %O A272399 1,2 %A A272399 _Colin Barker_, Apr 28 2016