|
Search: id:A117245
|
|
| |
|
| 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; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Agrees with A024918 (partial sums of A000961) for the first ten terms.
|
|
PROGRAM
|
(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.
Adjacent sequences: A117242 A117243 A117244 this_sequence A117246 A117247 A117248
Sequence in context: A025736 A022952 A024918 this_sequence A011914 A122047 A137358
|
|
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
|
|
|
Search completed in 0.002 seconds
|