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

 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 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.

Last modified June 20 13:02 EDT 2021. Contains 345164 sequences. (Running on oeis4.)