A088955 Primes of the form 60*n + 1.

61, 181, 241, 421, 541, 601, 661, 1021, 1201, 1321, 1381, 1621, 1741, 1801, 1861, 2161, 2221, 2281, 2341, 2521, 3001, 3061, 3121, 3181, 3301, 3361, 3541, 4021, 4201, 4261, 4441, 4561, 4621, 4801, 4861, 5101, 5281, 5521, 5581, 5641, 5701, 5821, 5881

Offset: 1

Author

Lekraj Beedassy, Dec 01 2003

Keywords

• nonn

Crossrefs

Cf. A088958, A090605.

Programs

Mathematica

lst={};Do[If[Mod[n,60]==1,If[PrimeQ[n],AppendTo[lst,n]]],{n,8!}];lst (* Vladimir Joseph Stephan Orlovsky, Jun 25 2009 *)
Select[Range[1,6000,60],PrimeQ] (* Harvey P. Dale, Aug 29 2012 *)

Formula

a(n) = 60*A088958(n) + 1 = A000040(A090605(n)). - Ray Chandler, Dec 02 2003

Extensions

More terms from Ray Chandler, Dec 02 2003