cp's OEIS Frontend

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.

A320752 Primes of the form 5*n^2 - 5*n + 13.

This page as a plain text file.
%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