%I A105106
%S A105106 0,5,6,8,12,15,20,21,29,42,50,53,54,56,60,65,72,74,77,78,81,83,89,95,98,
%T A105106 102,107,116,117,119,125,131,135,138,141,149,170,174,177,182,194,197,
%U A105106 201,204,210,221,224,230,240,242,243,252,258,261,263,264,282,285,291
%N A105106 Numbers n such that the string n101 is prime.
%C A105106 Also numbers such that 1000*n+101 is prime. - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), 
               Feb 21 2006
%e A105106 If n=0, then n101 = 0101 (prime).
%e A105106 If n=42, then n101 = 42101 (prime).
%t A105106 For[n = 0, n < 300, n++, If[PrimeQ[1000*n + 101], Print[n]]] - Stefan 
               Steinerberger (stefan.steinerberger(AT)gmail.com), Feb 21 2006
%Y A105106 Sequence in context: A047321 A033158 A032721 this_sequence A140504 A120131 
               A047437
%Y A105106 Adjacent sequences: A105103 A105104 A105105 this_sequence A105107 A105108 
               A105109
%K A105106 base,nonn
%O A105106 1,2
%A A105106 Parthasarathy Nambi (PachaNambi(AT)yahoo.com), Apr 07 2005
%E A105106 More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), 
               Feb 21 2006