|
| |
| |
|
|
|
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
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Agrees with A024918 (partial sums of A000961) for the first ten terms.
|
|
|
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: A025736 A022952 A024918 * A011914 A173645 A122047
Adjacent sequences: A117242 A117243 A117244 * A117246 A117247 A117248
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Giovanni Teofilatto (g.teofilatto(AT)tiscalinet.it), Apr 23 2006
|
|
|
EXTENSIONS
| Edited, corrected and extended by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Apr 25 2006
|
| |
|
|
