|
|
A168483
|
|
Terms of A123239 which are primes in Z(sqrt(5)).
|
|
1
|
|
|
2, 3, 13, 37, 67, 73, 83, 103, 107, 157, 193, 227, 277, 307, 313, 347, 367, 373, 397, 433, 443, 467, 523, 547, 563, 577, 587, 613, 673, 683, 733, 757, 787, 827, 853, 877, 883, 947, 967, 997, 1093, 1117, 1163, 1187, 1213, 1223, 1237, 1283, 1297
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Table of n, a(n) for n=1..49.
|
|
MATHEMATICA
|
MangammalQ[p_] := Block[{k = 3}, While[k > 2, k = Mod[3 k, p]]; k != 2];
A168483 = Select[Prime[Range[215]], MangammalQ[#] && MemberQ[{2, 3}, Mod[#, 5]] &] (* Ray Chandler, Jul 21 2011 *)
|
|
CROSSREFS
|
Cf. A003631, A123239, A168367.
Sequence in context: A174742 A215279 A082539 * A100424 A347537 A289549
Adjacent sequences: A168480 A168481 A168482 * A168484 A168485 A168486
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
A.K. Devaraj, Nov 26 2009
|
|
EXTENSIONS
|
Corrected and extended by Ray Chandler, Jul 21 2011
|
|
STATUS
|
approved
|
|
|
|