|
| |
|
|
A122263
|
|
a(n) = 2*a(n-1)-a(n-2)+2*(Prime[n+1]-Prime[n]).
|
|
0
| |
|
|
2, 3, 8, 21, 38, 63, 92, 129, 178, 231, 296, 369, 446, 531, 628, 737, 850, 975, 1108, 1245, 1394, 1551, 1720, 1905, 2098, 2295, 2500, 2709, 2926, 3171
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| f[1] = 2; f[2] = 3; f[n_] := f[n] = 2*f[n - 1] - f[n - 2] + 2*(Prime[n + 1] - Prime[n]); Table[f[n], {n, 1, 30}]
|
|
|
CROSSREFS
| Sequence in context: A118854 A192151 A137652 * A132730 A004790 A098119
Adjacent sequences: A122260 A122261 A122262 * A122264 A122265 A122266
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger Bagula (rlbagulatftn(AT)yahoo.com), Oct 18 2006
|
|
|
EXTENSIONS
| Edited by N. J. A. Sloane (njas(AT)research.att.com), Oct 23 2006
|
| |
|
|
