login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A238604 a(n) = Sum_{k=0..3} f(n+k)^2 where f=A130519. 2
0, 1, 5, 14, 30, 65, 125, 216, 344, 533, 793, 1134, 1566, 2125, 2825, 3680, 4704, 5945, 7421, 9150, 11150, 13481, 16165, 19224, 22680, 26605, 31025, 35966, 41454, 47573, 54353, 61824, 70016, 79025, 88885, 99630, 111294, 123985, 137741, 152600, 168600, 185861 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

G. C. Greubel, Table of n, a(n) for n = 0..2500

Index entries for linear recurrences with constant coefficients, signature (3,-3,1,2,-6,6,-2,-1,3,-3,1).

FORMULA

G.f.: x * (1 + 2*x + 2*x^2 + 2*x^3 + 10*x^4 + 2*x^5 + 2*x^6 + 2*x^7 + x^8) / ( (1 - x)^3 * (1 - x^4)^2 ).

a(n) = a(-1 - n) for all n in Z. floor( sqrt( a(n))) = A054925(n+1).

EXAMPLE

G.f. = x + 5*x^2 + 14*x^3 + 30*x^4 + 65*x^5 + 125*x^6 + 216*x^7 + ...

MATHEMATICA

CoefficientList[Series[x*(1+2*x+2*x^2+2*x^3+10*x^4+2*x^5+2*x^6+2*x^7+ x^8)/((1-x)^3*(1-x^4)^2), {x, 0, 50}], x] (* G. C. Greubel, Aug 07 2018 *)

PROG

(PARI) {a(n) = if( n<0, n = -1-n); polcoeff( x * (1 + 2*x + 2*x^2 + 2*x^3 + 10*x^4 + 2*x^5 + 2*x^6 + 2*x^7 + x^8) / ( (1 - x)^3 * (1 - x^4)^2 ) + x * O(x^n), n)};

(MAGMA) m:=25; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!(x*(1 +2*x+2*x^2+2*x^3+10*x^4+2*x^5+2*x^6+2*x^7+ x^8)/((1-x)^3*(1-x^4)^2))); // G. C. Greubel, Aug 07 2018

CROSSREFS

Cf. A054925, A130519.

Sequence in context: A299899 A211804 A283591 * A166068 A070129 A081861

Adjacent sequences:  A238601 A238602 A238603 * A238605 A238606 A238607

KEYWORD

nonn,easy

AUTHOR

Michael Somos, Mar 01 2014

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 25 08:27 EDT 2021. Contains 345453 sequences. (Running on oeis4.)