The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A178092 Lesser of emirp pairs whose digital sums are also emirps (A178091). 4
 157, 179, 337, 359, 1097, 1237, 1259, 1381, 1439, 1453, 1471, 1583, 1619, 1723, 3019, 3109, 3163, 3257, 3343, 3347, 3527, 7699, 7879, 9679, 10039, 10079, 10273, 10453, 10457, 10651, 10781, 10853, 11083, 11159, 11353, 11447, 11551, 11717, 11731, 11933, 12073 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Harvey P. Dale, Table of n, a(n) for n = 1..10000 MATHEMATICA emrp[n_]:=Module[{e=FromDigits[Reverse[IntegerDigits[n]]]}, If[n!=e&&PrimeQ[ e], {n, e}, {}]]; dsemQ[m_]:=Module[ {ds=Total[IntegerDigits[m]], em}, em= FromDigits[ Reverse[IntegerDigits[ ds]]]; em!=ds&& And@@PrimeQ[{ds, em}]]; Select[Transpose[Rest[Union[Sort/@(emrp/@Prime[Range[2000]])]]][[1]], dsemQ] (* Harvey P. Dale, Sep 11 2013 *) CROSSREFS Cf. A109308, A178091, A178093. Sequence in context: A180551 A096704 A178091 * A140035 A007356 A236537 Adjacent sequences: A178089 A178090 A178091 * A178093 A178094 A178095 KEYWORD nonn,base AUTHOR Lekraj Beedassy, May 19 2010 EXTENSIONS Corrected and extended by Harvey P. Dale, Sep 11 2013 STATUS approved

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

Last modified March 2 01:29 EST 2024. Contains 370447 sequences. (Running on oeis4.)