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 A165352 #11 Sep 08 2022 08:45:47 %S A165352 13,53,89,151,251,701,739,859,1429,1709,2143,3001,4751,7019,8513, %T A165352 10151,12401,14533,17203,18719,21319,23869,27259,30133,41039,42193, %U A165352 44549,45751,46663,52973,82619,99233,104651,114479,120293,135979,138599,148783,151523 %N A165352 Primes of the form p + (p^2 - 1)/8, where p is also prime. %C A165352 Primes of the form k+(k^2-1)/8, where k >0 are prime or composite, are the superset 13, 19, 43, 53, 89, 103 etc. %H A165352 Vincenzo Librandi, <a href="/A165352/b165352.txt">Table of n, a(n) for n = 1..1000</a> %F A165352 a(n) = A165353(n)+(A165353(n)^2-1)/8. %t A165352 Select[Table[p + (p^2 - 1)/8, {p, Prime[Range[200]]}], PrimeQ] (* _Vincenzo Librandi_, Oct 12 2012 *) %o A165352 (Magma) [a: p in PrimesInInterval(3, 1200) | IsPrime(a) where a is p + (p^2 - 1) div 8 ]; // _Vincenzo Librandi_, Oct 12 2012 %o A165352 (PARI) forprime(p=3,1e4,if(isprime(t=p^2>>3+p),print1(t", "))) \\ _Charles R Greathouse IV_, May 15 2013 %Y A165352 Cf. A165353, A165354. %K A165352 nonn,easy %O A165352 1,1 %A A165352 _Vincenzo Librandi_, Sep 16 2009 %E A165352 More terms from _R. J. Mathar_, Sep 21 2009