|
%I #8 Nov 21 2013 12:50:02
%S 10,101,1011,10111,101111,10111111,101111111,1011111111111,
%T 10111111111111111111,101111111111111111111111111111111111,
%U 1011111111111111111111111111111111111111
%N A007505 in binary.
%C Primes of the form 10, 101, 1011, 10111,..
%F A002235(n)=A091997(n)-A000012(n)=A000120(A007505(n))-A023416(A007505(n)).
%e a(12)=101111111111111111111111111111111111111111111.
%t FromDigits/@Select[Table[PadRight[{1,0},n,1],{n,0,50}], PrimeQ[ FromDigits[ #,2]]&] (* _Harvey P. Dale_, Nov 12 2011 *)
%K nonn,base
%O 1,1
%A _Juri-Stepan Gerasimov_, Jun 24 2010
|
