cp's OEIS Frontend

A351628 Partial sums of A352717.

%I A351628 #15 Jun 09 2022 11:34:27
%S A351628 1,2,5,9,13,17,24,31,38,45,56,67,78,89,100,111,122,140,158,176,194,
%T A351628 212,230,248,266,284,302,320,349,378,407,436,465,494,523,552,581,610,
%U A351628 639,668,697,726,755,784,813,842,889,936,983,1030,1077,1124,1171,1218
%N A351628 Partial sums of A352717.
%t A351628 Accumulate[Flatten[Map[ConstantArray[LucasL[#],LucasL[#-1]]&,Range[15]]]] (* _Peter J. C. Moses_, May 02 2022 *)
%o A351628 (Python)
%o A351628 from itertools import islice
%o A351628 def A351628_gen(): # generator of terms
%o A351628     a, b, c = 1, 3, 0
%o A351628     while True:
%o A351628         yield from (c+i*a for i in range(1,b-a+1))
%o A351628         a, b, c = b, a+b, c + a*(b-a)
%o A351628 A351628_list = list(islice(A351628_gen(),40)) # _Chai Wah Wu_, Jun 09 2022
%Y A351628 Cf. A087172, A130473, A353717.
%K A351628 nonn
%O A351628 1,2
%A A351628 _Clark Kimberling_, May 04 2022