A117245 Partial sums of A115975.
1, 3, 6, 10, 15, 22, 30, 39, 50, 63, 80, 99, 122, 147, 174, 203, 234, 266, 303, 344, 387, 434, 483, 536, 595, 656, 723, 794, 867, 946, 1029, 1118, 1215, 1316, 1419, 1526, 1635, 1748, 1869, 1994, 2121, 2252, 2389, 2528, 2677, 2828, 2985, 3148, 3315, 3484, 3657
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Accumulate[seq[180]] (* Amiram Eldar, Jun 27 2025, using the function seq[max_] at A115975 *)
-
PARI
{m=180;v=Set([]);forprime(p=2,m,i=0;while((s=p^fibonacci(i))
Extensions
Edited, corrected and extended by Klaus Brockhaus, Apr 25 2006
Comments