This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A168539 #13 Oct 30 2019 15:26:30
%S A168539 11,59,83,107,131,179,227,251,347,419,443,467,491,563,587,659,683,827,
%T A168539 947,971,1019,1091,1163,1187,1259,1283,1307,1427,1451,1499,1523,1571,
%U A168539 1619,1667,1787,1811,1907,1931,1979,2003,2027,2099,2243,2267,2339
%N A168539 Terms of A123239 which are prime in Z(i), Z(rho) and Z(sqrt(2)).
%t A168539 MangammalQ[p_] := Block[{k = 3}, While[k > 2, k = Mod[3 k, p]]; k != 2];
%t A168539 A168539 = Select[Prime[Range[350]], MangammalQ[#] && Mod[#, 24] == 11 &] (* _Ray Chandler_, Jul 21 2011 *)
%Y A168539 Cf. A002145, A003627, A003629, A123239, A107007, A168454.
%K A168539 nonn
%O A168539 1,1
%A A168539 _A.K. Devaraj_, Nov 29 2009
%E A168539 Corrected and extended by _Ray Chandler_, Jul 21 2011