login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A168539
Terms of A123239 which are prime in Z(i), Z(rho) and Z(sqrt(2)).
3
11, 59, 83, 107, 131, 179, 227, 251, 347, 419, 443, 467, 491, 563, 587, 659, 683, 827, 947, 971, 1019, 1091, 1163, 1187, 1259, 1283, 1307, 1427, 1451, 1499, 1523, 1571, 1619, 1667, 1787, 1811, 1907, 1931, 1979, 2003, 2027, 2099, 2243, 2267, 2339
OFFSET
1,1
MATHEMATICA
MangammalQ[p_] := Block[{k = 3}, While[k > 2, k = Mod[3 k, p]]; k != 2];
A168539 = Select[Prime[Range[350]], MangammalQ[#] && Mod[#, 24] == 11 &] (* Ray Chandler, Jul 21 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
A.K. Devaraj, Nov 29 2009
EXTENSIONS
Corrected and extended by Ray Chandler, Jul 21 2011
STATUS
approved