|
|
A023615
|
|
Convolution of Fibonacci numbers and primes.
|
|
2
|
|
|
2, 5, 12, 24, 47, 84, 148, 251, 422, 702, 1155, 1894, 3090, 5027, 8164, 13244, 21467, 34772, 56306, 91149, 147528, 238756, 386367, 625212, 1011676, 1636989, 2648768, 4285864, 6934741, 11220718, 18155586, 29376435, 47532158, 76908732, 124441039, 201349922
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
N:= 100: # to get a(0)..a(N)
G:= add(ithprime(i)*x^(i-1), i=1..N+1):
S:= series(G /(1-x-x^2), x, N+1):
# second Maple program:
a:= proc(n) option remember; `if`(n<0, 0,
a(n-1)+a(n-2)+ithprime(n+1))
end:
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|