%I #3 Mar 30 2012 17:26:17
%S 29,92,95,97,109,139,149,159,239,249,290,292,294,295,296,297,298,299,
%T 379,391,393,398,419,449,469,499,549,579,590,598,599,659,669,690,692,
%U 693,729,749,794,795,819,839,849,889,890,891,892,893,894,895,899,900
%N Numbers n such that n and n-th prime have only one common digit = 9.
%t bb={};Do[If[IntegerDigits [n]\[Intersection]IntegerDigits [ Prime[n]]\[Equal]{9}, bb=Append[bb, n]], {n, 1800}];bb
%Y Cf. A107930 - A107940.
%K nonn,base
%O 1,1
%A _Zak Seidov_, Jun 08 2005