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 A272629 #17 May 05 2016 04:26:43 %S A272629 29,113,419,503,659,887,1277,1361,1433,2141,2213,2687,3851,4007,4397, %T A272629 4787,5333,5417,5573,7127,7757,7829,8609,8693,8849,9161,9311,9623, %U A272629 10247,10487,11261,11423,12197,12743,13217,13523,14537,14621,14771,15083,15161 %N A272629 Primes p such that (p^2 + p + 1)/13 is prime. %C A272629 Primes in A002642. %H A272629 Seiichi Manyama, <a href="/A272629/b272629.txt">Table of n, a(n) for n = 1..1000</a> %e A272629 a(1) = 29 because (29^2+29+1)/13 = 67 is a prime. %t A272629 Select[Prime[Range[5000]], PrimeQ[(#^2 + # + 1) / 13] &] %o A272629 (PARI) lista(nn) = {forprime(p=2, nn, if ((denominator(q=(p^2 + p + 1)/13)== 1) && isprime(q), print1(p, ", ")););} \\ _Michel Marcus_, May 05 2016 %Y A272629 Cf. A002642. %K A272629 nonn %O A272629 1,1 %A A272629 _Vincenzo Librandi_, May 04 2016