OFFSET
1,1
COMMENTS
Also primes of form 5*n+1 or equivalently 5*n+6.
Primes p such that the arithmetic mean of divisors of p^4 is an integer: A000203(p^4)/A000005(p^4) = C. - Ctibor O. Zizka, Sep 15 2008
Being a subset of A141158, this is also a subset of the primes of form x^2-5*y^2. - Tito Piezas III, Dec 28 2008
5 is quadratic residue of primes of this form. - Vincenzo Librandi, Jun 25 2014
Primes p such that 5 divides sigma(p^4), cf. A274397. - M. F. Hasler, Jul 10 2016
LINKS
Michael B. Porter, Table of n, a(n) for n = 1..100000
A. Granville and G. Martin, Prime number races, arXiv:math/0408319 [math.NT], 2004.
N. J. A. Sloane, "A Handbook of Integer Sequences" Fifty Years Later, arXiv:2301.03149 [math.NT], 2023, p. 5.
FORMULA
A104146(floor(a(n)/10)) = 1.
a(n) ~ 4n log n. - Charles R Greathouse IV, Sep 06 2012
MATHEMATICA
Select[Prime@Range[210], Mod[ #, 10] == 1 &] (* Ray Chandler, Dec 06 2006 *)
Select[Range[11, 1291, 10], PrimeQ] (*Zak Seidov, Aug 14 2011*)
PROG
(Haskell)
a030430 n = a030430_list !! (n-1)
a030430_list = filter ((== 1) . a010051) a017281_list
-- Reinhard Zumkeller, Apr 16 2012
(PARI) is(n)=n%10==1 && isprime(n) \\ Charles R Greathouse IV, Sep 06 2012
(PARI) lista(nn) = forprime(p=11, nn, if(p%10==1, print1(p, ", "))) \\ Iain Fox, Dec 30 2017
CROSSREFS
Cf. A001583 (subsequence).
KEYWORD
nonn,easy
AUTHOR
STATUS
approved