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

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A178546 Emirps in which n first occurs as a substring. 1
107, 13, 1021, 13, 149, 157, 167, 17, 389, 79, 107, 113, 1201, 13, 149, 157, 167, 17, 1181, 199, 1201, 1021, 1223, 1223, 1249, 1259, 12269, 1279, 1283, 1229, 1301, 31, 1321, 337, 347, 359, 3613, 37, 389, 739, 1409, 941, 1429, 743, 11447, 1453, 3463, 347, 1487, 149, 7507 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,1
LINKS
MATHEMATICA
emrpQ[n_]:=Module[{idn=IntegerDigits[n], ridn}, ridn=Reverse[idn]; idn!=ridn && PrimeQ[ FromDigits[ ridn]]]; nss[n_]:= Module[{idn=IntegerDigits[n]}, Select[e, MemberQ[Partition[ IntegerDigits[#], Length[idn], 1], idn]&, 1]]; With[{e=Select[Prime[Range[50000]], emrpQ]}, Flatten[ Join[{107}, Table[ nss[i], {i, 50}]]]] (* Harvey P. Dale, Oct 08 2012 *)
CROSSREFS
Sequence in context: A082177 A156020 A160487 * A096712 A161176 A161372
KEYWORD
nonn,base
AUTHOR
Lekraj Beedassy, May 29 2010
EXTENSIONS
Corrected and extended by Harvey P. Dale, Oct 08 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 | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 02:23 EDT 2024. Contains 371264 sequences. (Running on oeis4.)