|
|
3, 5, 7, 19, 47, 73, 97, 131, 223, 229, 257, 263, 277, 331, 367, 389, 397, 487, 577, 641, 643, 683, 701, 739, 743, 757, 797, 857, 877, 1031, 1291, 1297, 1423, 1451, 1543, 1579, 1637, 1697, 1723, 1823, 1949, 2039, 2081, 2381, 2477, 2539, 2617, 2659, 2689, 2749
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Table of n, a(n) for n=1..50.
|
|
|
MATHEMATICA
|
Select[Select[Range[3000], PrimeQ[Sum[Prime[Prime[i]], {i, 1, #}]]&], PrimeQ[ # ] &] - Stefan Steinerberger, Jun 23 2007
|
|
|
CROSSREFS
|
Cf. A006450, A083186, A109790.
Sequence in context: A005850 A052334 A154526 * A171643 A072002 A217651
Adjacent sequences: A126141 A126142 A126143 * A126145 A126146 A126147
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
J. M. Bergot, Jun 11 2007
|
|
|
EXTENSIONS
|
More terms from Stefan Steinerberger, Jun 23 2007
|
|
|
STATUS
|
approved
|
|
