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

 

Logo

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A134100 Primes following odd numbers not preceded by primes. 5
29, 37, 53, 59, 67, 79, 89, 97, 127, 137, 149, 157, 163, 173, 179, 191, 211, 223, 239, 251, 257, 263, 269, 277, 293, 307, 331, 337, 347, 359, 367, 373, 379, 389, 397, 409, 419, 431, 439, 449, 457, 479, 487, 499, 509, 521, 541, 547, 557, 563, 569, 577, 587 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Upper primes after a prime gap of 6 or larger (Union of A031925, A031927, A031929, ...) - R. J. Mathar, Mar 15 2012

LINKS

Table of n, a(n) for n=1..53.

EXAMPLE

a(1) = 29 because 29 follows the odd nonprime 27 which in turn follows the odd nonprime 25.

MATHEMATICA

Select[Range[5, 1000, 2], PrimeQ[#]&&!PrimeQ[#-2]&&!PrimeQ[#-4]&] (* Vladimir Joseph Stephan Orlovsky, Feb 03 2012 *)

PROG

UBASIC: 10 'primes using counters 20 N=3:print "2 "; :print "3 "; :C=2 30 A=3:S=sqrt(N) 40 B=N\A 50 if B*A=N then 55 55 Q=N-2:R=N+2: if Q<>prmdiv(Q) and N<>prmdiv(N) and R=prmdiv(R) then print Q; N; R; "-"; :stop:else N=N+2:goto 30 60 A=A+2 70 if A<=sqrt(N) then 40:stop 81 C=C+1 100 N=N+2:goto 30

(PARI) A134100()={my(maxx=600); forstep(j5=5, maxx, 2, if(isprime(j5), next); if(isprime(j5+2)&&!isprime(j5-2), print1(j5+2, ", "))); } \\ Bill McEachen, Dec 20 2016

CROSSREFS

Cf. A007510, A083370, A124582, A134099, A134101.

Sequence in context: A097997 A177873 A234973 * A060769 A031925 A107134

Adjacent sequences:  A134097 A134098 A134099 * A134101 A134102 A134103

KEYWORD

easy,nonn

AUTHOR

Enoch Haga, Oct 08 2007

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 January 18 04:47 EST 2019. Contains 319269 sequences. (Running on oeis4.)