|
|
A083242
|
|
For n >= 3, a(n-3) + a(n-2) + a(n-1) + a(n) = prime(n); a(0) = 0, a(1) = 1, a(2) = 1.
|
|
0
|
|
|
0, 1, 1, 3, 2, 5, 3, 7, 4, 9, 9, 9, 10, 13, 11, 13, 16, 19, 13, 19, 20, 21, 19, 23, 26, 29, 23, 25, 30, 31, 27, 39, 34, 37, 29, 49, 36, 43, 35, 53, 42, 49, 37, 63, 44, 53, 39, 75
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
EXAMPLE
|
a(43) + a(44) + a(45) + a(46) = 63 + 44 + 53 + 39 = 199 = p[46]
|
|
MATHEMATICA
|
f[x_] := Prime[x]-f[x-1]-f[x-2]-f[x-3] {f[0]=0, f[1]=1, f[2]=1}; Table[f[w], {w, 0, 20}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|