A107933 - OEIS

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

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give

A107933

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

52, 62, 82, 129, 200, 202, 206, 225, 226, 257, 258, 268, 269, 312, 320, 323, 329, 342, 362, 402, 412, 421, 422, 423, 424, 426, 427, 428, 462, 492, 520, 582, 602, 812, 824, 922, 925, 926, 928, 929, 1042, 1122, 1142, 1212, 1224

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

Other cases of common digit d: A107931 (d=0), A107932 (d=1), A107934 (d=3), A107935 (d=4), A107936 (d=5), A107937 (d=6), A107938 (d=7), A107939 (d=8), A107940 (d=9). Cf. A107930 - smallest m's for digits 0,...,9.

LINKS

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

EXAMPLE

a(1) = 52 because the 52nd prime, 239 and 52 have the only common digit 2, and 52 is the smallest such number.

MATHEMATICA

bb = {}; Do[If[IntegerDigits [n]\[Intersection]IntegerDigits [ Prime[n]]\[Equal]{2}, bb = Append[bb, n]], {n, 1800}]; bb (* Zak Seidov *)

FromDigits[First[#]]&/@Select[Table[IntegerDigits[{n, Prime[n]}], {n, 1300}], Intersection@@# == {2} &] (* Harvey P. Dale, Nov 05 2013 *)

CROSSREFS

Cf. A107930 - A107940.

Sequence in context: A271309 A045178 A124471 * A039388 A043211 A043991

Adjacent sequences: A107930 A107931 A107932 * A107934 A107935 A107936

KEYWORD

nonn,base

AUTHOR

Zak Seidov, May 28 2005

STATUS

approved