login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A140533 Primes congruent to 13 or 17 mod 30. 2
13, 17, 43, 47, 73, 103, 107, 137, 163, 167, 193, 197, 223, 227, 257, 283, 313, 317, 347, 373, 433, 463, 467, 523, 557, 587, 613, 617, 643, 647, 673, 677, 733, 797, 823, 827, 853, 857, 883, 887, 947, 977, 1033, 1063, 1093, 1097, 1123, 1153, 1187, 1213, 1217 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

MAPLE

A140533 := proc(n) local a; if n = 1 then 13; else a := nextprime(procname(n-1)) ; while not a mod 30 in {13, 17} do a := nextprime(a) ; end do: return a; end if; end: seq(A140533(n), n=1..80) ; # R. J. Mathar, Oct 22 2009

MATHEMATICA

Select[Prime[Range[300]], MemberQ[{13, 17}, Mod[#, 30]]&] (* Vincenzo Librandi, Aug 15 2012 *)

PROG

(MAGMA) [p: p in PrimesUpTo(3000)|p mod 30 in {13, 17}]; // Vincenzo Librandi, Dec 18 2010

CROSSREFS

Cf. A132233, A039949.

Cf. A000040.

Sequence in context: A125524 A156553 A248474 * A180527 A076789 A089577

Adjacent sequences:  A140530 A140531 A140532 * A140534 A140535 A140536

KEYWORD

nonn,easy

AUTHOR

Juri-Stepan Gerasimov Jul 28 2008

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 25 16:08 EDT 2019. Contains 322461 sequences. (Running on oeis4.)