login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A217614 Emirps p such that the next emirp is equal to the next prime. 0
13, 31, 71, 73, 337, 701, 733, 739, 743, 761, 937, 953, 967, 983, 1021, 1031, 1097, 1103, 1151, 1193, 1201, 1213, 1217, 1223, 1229, 1231, 1237, 1249, 1279, 1381, 1399, 1499, 1511, 1583, 1597, 1723, 1733, 1831, 1933, 3011, 3019, 3083, 3089, 3191, 3271, 3299 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

EXAMPLE

13 is in the sequence because the next emirp (17) is also the next prime.

71 is in the sequence because the next emirp (73) is also the next prime.

MATHEMATICA

emirpQ[n_] := PrimeQ[n] && Block[{r=FromDigits@Reverse@IntegerDigits@n},

r != n && PrimeQ[r]]; nextEmirp[n_] := Block[{e=NextPrime[n]}, While[! emirpQ[e], e = NextPrime[e]]; e]; Select[Prime@Range@1000, emirpQ[#] && NextPrime[#] == nextEmirp[#] &] (* Giovanni Resta, Oct 28 2012 *)

CROSSREFS

Cf. A000040, A006567.

Sequence in context: A268927 A061239 A072023 * A158723 A211116 A107288

Adjacent sequences:  A217611 A217612 A217613 * A217615 A217616 A217617

KEYWORD

nonn,base,easy

AUTHOR

Jonathan Vos Post, Oct 08 2012

EXTENSIONS

More terms from Giovanni Resta, Oct 28 2012

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 June 20 13:02 EDT 2021. Contains 345164 sequences. (Running on oeis4.)