|
| |
|
|
A069103
|
|
a(1) = 1; a(2) = 1; a(n) = Prime[a(n-1)] + Prime[a(n-2)] if n > 2.
|
|
4
| |
|
|
1, 1, 4, 9, 30, 136, 882, 7626, 84448, 1159912, 19226112, 376464500, 8556370952, 222510227460, 6542050923204
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
EXAMPLE
| a(3) = Prime[a(2)] + Prime[a(1)] = 2 + 2 = 4.
|
|
|
MATHEMATICA
| f[x_] := Prime[f[x-1]]+Prime[f[x-2]] {f[1]=1, f[2]=1}; Table[f[w], {w, 1, 15}]
|
|
|
CROSSREFS
| Sequence in context: A149114 A105865 A187983 * A041137 A042599 A145543
Adjacent sequences: A069100 A069101 A069102 * A069104 A069105 A069106
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Apr 06 2002
|
|
|
EXTENSIONS
| More terms from Labos E. (labos(AT)ana.sote.hu), Apr 11 2003
|
| |
|
|
