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,2

Comments

Agrees with A024918 (partial sums of A000961) for the first ten terms.

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

Accumulate[seq[180]] (* Amiram Eldar, Jun 27 2025, using the function seq[max_] at A115975 *)

Prog

(PARI) {m=180; v=Set([]); forprime(p=2, m, i=0; while((s=p^fibonacci(i))<m, v=setunion(v, Set(s)); i++)); v=vecsort(eval(v)); s=0; for(j=1, #v, print1(s=s+v[j], ", "))}

Crossrefs

Cf. A115975, A024918, A000961.

Sequence in context: A288425 A022952 A024918 * A011914 A173645 A122047

Adjacent sequences: A117242 A117243 A117244 * A117246 A117247 A117248

Keyword

easy,nonn

Author

Giovanni Teofilatto, Apr 23 2006

Extensions

Edited, corrected and extended by Klaus Brockhaus, Apr 25 2006

Status

approved