A130473 - OEIS

%I #9 Jun 19 2022 09:44:39

%S 1,3,6,9,14,19,24,32,40,48,56,64,77,90,103,116,129,142,155,168,189,

%T 210,231,252,273,294,315,336,357,378,399,420,441,475,509,543,577,611,

%U 645,679,713,747,781,815,849,883,917,951,985,1019,1053,1087,1121,1155,1210

%N Partial sums of A087172.

%F a(n) = (1/2)*(Fib(2*b(n)+1) - 3*Fib(b(n))*Fib(b(n)+1)-1) + (n+1)*Fib(b(n)) where b(n) = A130233(n) = A130234(n+1)-1 and Fib(n)=A000045(n).

%t Accumulate[Flatten[Map[ConstantArray[Fibonacci[#],Fibonacci[#-1]]&,Range[15]]]] (* _Peter J. C. Moses_, May 02 2022 *)

%Y Cf. A000045, A130233, A130234, A130235, A130236, A130238, A130240, A087172.

%K nonn

%O 1,2

%A _Hieronymus Fischer_, May 28 2007