login
This site is supported by donations to The OEIS Foundation.

 

Logo

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A202462 Sum{F(i,j) : 1<=i<=n, 1<=j<=n}, where F is the Fibonacci fusion array, A202453. 5
1, 5, 21, 70, 214, 614, 1703, 4619, 12363, 32812, 86636, 228012, 598893, 1571089, 4118305, 10790194, 28262594, 74014290, 193807315, 507451415, 1328617751, 3478516440, 9107117016, 23843134680, 62422772569, 163425968669, 427856404653 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Partial sums of A188516.

LINKS

Table of n, a(n) for n=1..27.

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

FORMULA

G.f. x*(-1-2*x^2+x^3) / ( (1+x)*(x^2-3*x+1)*(x^2+x-1)*(x-1)^2 ). - R. J. Mathar, Dec 20 2011

MATHEMATICA

n = 28;

Q = NestList[Most[Prepend[#, 0]] &, #, Length[#] - 1] &[

   Table[Fibonacci[k], {k, 1, n}]];

P = Transpose[Q]; F = P.Q;

a[m_] := Sum[F[[i]][[j]], {i, 1, m}, {j, 1, m}]

Table[a[m], {m, 1, n}]  (* A202462 *)

Table[a[m] - a[m - 1], {m, 1, n}]  (* A188516 *)

LinearRecurrence[{5, -6, -4, 10, -2, -3, 1}, {1, 5, 21, 70, 214, 614, 1703}, 30] (* Harvey P. Dale, Jul 23 2015 *)

CROSSREFS

Cf. A202451, A188616.

Sequence in context: A099899 A269566 A271492 * A055280 A268304 A273450

Adjacent sequences:  A202459 A202460 A202461 * A202463 A202464 A202465

KEYWORD

nonn

AUTHOR

Clark Kimberling, Dec 19 2011

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 January 18 10:53 EST 2019. Contains 319271 sequences. (Running on oeis4.)