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 A163580 #9 Jul 29 2017 12:07:07 %S A163580 5,53,151,967,1129,2129,2617,2879,4217,4549,6397,6599,7013,7877,8101, %T A163580 8329,9029,10007,10259,11839,12391,26881,30707,35257,35729,36683, %U A163580 37649,41131,41641,49667,50227,56597,63347,71143,75211,79393,82963,102797 %N A163580 Primes of the form floor(k+A000217(k-1)*Pi), Pi = A000796, k integer. %H A163580 G. C. Greubel, <a href="/A163580/b163580.txt">Table of n, a(n) for n = 1..1000</a> %t A163580 s=0;lst={};Do[s+=n;p=IntegerPart[s];If[PrimeQ[p],AppendTo[lst,p]],{n, 1,7!,Pi}];lst %o A163580 (PARI) for(n=1,500, m=floor(n + n*(n-1)*Pi/2); if(isprime(m), print1(m, ", "))) \\ _G. C. Greubel_, Jul 28 2017 %Y A163580 Cf. A163579 %K A163580 nonn %O A163580 1,1 %A A163580 _Vladimir Joseph Stephan Orlovsky_, Jul 31 2009 %E A163580 Definition clarified by _R. J. Mathar_, Aug 01 2009