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 A320752 #16 Aug 22 2021 17:31:22 %S A320752 13,23,43,73,113,163,223,293,373,463,563,673,1063,1213,1373,1543,1723, %T A320752 1913,2113,2543,3793,4073,4363,4663,4973,5623,6673,7043,8623,9043, %U A320752 9473,12263,12763,14323,15413,15973,17123,17713,18313,19543,20173,22123,23473,26293 %N A320752 Primes of the form 5*n^2 - 5*n + 13. %C A320752 The first 12 numbers of the form 5*n^2 - 5*n + 13 (n=1 to 12) are primes. %H A320752 Harvey P. Dale, <a href="/A320752/b320752.txt">Table of n, a(n) for n = 1..1000</a> %p A320752 select(isprime,[seq(5*n^2-5*n+13,n=1..75)]); # _Muniru A Asiru_, Oct 21 2018 %t A320752 Select[Table[5n^2-5n+13,{n,80}],PrimeQ] (* _Harvey P. Dale_, Aug 22 2021 *) %o A320752 (PARI) terms(n) = my(i=0); for(k=1, oo, my(x=5*k^2-5*k+13); if(ispseudoprime(x), print1(x, ", "); i++); if(i==n, break)) %o A320752 /* Print initial 50 terms as follows */ %o A320752 terms(50) \\ _Felix Fröhlich_, Oct 20 2018 %o A320752 (GAP) Filtered(List([1..75],n->5*n^2-5*n+13),IsPrime); # _Muniru A Asiru_, Oct 21 2018 %Y A320752 Cf. A090562. %K A320752 nonn %O A320752 1,1 %A A320752 _Arashdeep Singh_, Oct 20 2018 %E A320752 More terms from _Felix Fröhlich_, Oct 20 2018