A089346 - OEIS

%I #11 Dec 05 2013 19:56:35

%S 11,31,71,331,991,3331,33331,99991,333331,3333331,9999991,33333331,

%T 555555555551,5555555555551,7777777777771,333333333333333331,

%U 1111111111111111111,77777777777777777771,11111111111111111111111

%N Primes of the form identical odd digits followed by a 1.

%H Vincenzo Librandi, <a href="/A089346/b089346.txt">Table of n, a(n) for n = 1..44</a>

%t Select[FromDigits/@Flatten[Table[Join[PadLeft[{n},i,n],{1}],{i,25},{n,1,9,2}], 1],PrimeQ] (* _Harvey P. Dale_, Jul 25 2011 *)

%Y Cf. A089345, A089347.

%K base,nonn

%O 1,1

%A _Amarnath Murthy_, Nov 05 2003

%E More terms from _Ray Chandler_, Nov 07 2003