|
|
A144467
|
|
A038601 type numbers where Prime of Prime numbers: a(n)=Prime[A038601 (n)].
|
|
0
|
|
|
3, 5, 11, 41, 919, 3517, 6691, 13709, 23669, 52301, 83101, 146051, 417959, 777901, 970231, 1076401, 1894117, 2315069, 2592269, 2641469, 2777111, 2997227, 3523343, 3788843, 4076257, 4159231, 5082059, 5271961, 5295569, 5363801, 6451931
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
(*A038601*) b = {2, 3, 5, 13, 157, 491, 863, 1621, 2633, 5347, 8117, 13513, 35227, 62311, 76367, 84017, 141637, 170537, 189353, 192667, 201821, 216617, 251677, 269257, 288203, 293621, 353807, 366103, 367621, 372023, 441703, 444167, 478571, 518657, 582371, 626333}; c = Table[Prime[b[[n]]], {n, 1, Length[b]}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|