%I A057148
%S A057148 0,1,11,101,111,1001,1111,10001,10101,11011,11111,100001,101101,110011,
%T A057148 111111,1000001,1001001,1010101,1011101,1100011,1101011,1110111,
%U A057148 1111111,10000001,10011001,10100101,10111101,11000011,11011011
%N A057148 Palindromes only using 0 and 1 (i.e. base 2 palindromes).
%C A057148 (* get NextPalindrome from A029965 *) Select[ NestList[ NextPalindrome, 
               0, 11110], Max(AT) IntegerDigits(AT)# < 2 &] (* Robert G. Wilson 
               v *)
%C A057148 If one takes a number from this sequence that has less than 10 digits 
               and squares it, then the result will also be a palindrome. [From 
               Dmitry Kamenetsky (dkamen(AT)rsise.anu.edu.au), Oct 21 2008]
%Y A057148 Cf. A006995 for sequence translated from binary to decimal. A016116 for 
               number of terms of sequence with n+1 binary digits [0 taken to have 
               no digits].
%Y A057148 Cf. A118594, A118595, A118596, A118597, A118598, A118599, A118600, A002113.
%Y A057148 Sequence in context: A043036 A072001 A099821 this_sequence A076289 A117697 
               A091366
%Y A057148 Adjacent sequences: A057145 A057146 A057147 this_sequence A057149 A057150 
               A057151
%K A057148 base,nonn
%O A057148 1,3
%A A057148 Henry Bottomley (se16(AT)btinternet.com), Aug 14 2000