A107936 Numbers n such that n and n-th prime have only one common digit = 5.

54, 55, 245, 250, 335, 385, 415, 458, 459, 500, 502, 511, 559, 573, 595, 605, 615, 675, 685, 695, 705, 725, 735, 750, 775, 850, 851, 853, 857, 858, 951, 952, 955, 956, 1065, 2058, 2235

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

s={}; Do[If[IntegerDigits[n]\[Intersection]IntegerDigits[Prime[n]]\[Equal]{5}, s=Append[s, n]], {n, 3000}]; A107936=s
Select[Range[2500], Intersection@@IntegerDigits/@{#, Prime[#]}=={5}&] (* Harvey P. Dale, Aug 05 2025 *)

Crossrefs

Cf. A107930 - A107940.

Sequence in context: A247897 A247900 A116386 * A252722 A326181 A300447

Adjacent sequences: A107933 A107934 A107935 * A107937 A107938 A107939

Keyword

nonn,base

Author

Zak Seidov, Jun 08 2005

Status

approved