login
Partial sums of A115975.
1

%I #3 Mar 30 2012 18:40:02

%S 1,3,6,10,15,22,30,39,50,63,80,99,122,147,174,203,234,266,303,344,387,

%T 434,483,536,595,656,723,794,867,946,1029,1118,1215,1316,1419,1526,

%U 1635,1748,1869,1994,2121,2252,2389,2528,2677,2828,2985,3148,3315,3484,3657

%N Partial sums of A115975.

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

%o (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],","))}

%Y Cf. A115975, A024918, A000961.

%K easy,nonn

%O 1,2

%A _Giovanni Teofilatto_, Apr 23 2006

%E Edited, corrected and extended by _Klaus Brockhaus_, Apr 25 2006