%I #8 May 16 2021 14:07:02
%S 1,3,5,7,9,11,15,17,19,27,29,25,21,23,31,33,35,51,53,45,47,63,65,67,
%T 99,101,85,87,119,121,81,71,115,105,77,91,111,125,97,69,83,103,117,89,
%U 79,123,113,73,75,107,109,93,95,127,129,131,195,197,165,167,231
%N Start with 1; repeatedly reverse the digits when the number is written in binary and add 2 to get the next term.
%H Harvey P. Dale, <a href="/A118360/b118360.txt">Table of n, a(n) for n = 1..1000</a>
%H N. J. A. Sloane and others, <a href="/wiki/Sequences_of_RADD_type">Sequences of RADD type</a>, OEIS wiki.
%e After 11 = 11_10 = 1011_2 the next term is 1101_2 + 10_2 = 1111_2 = 15_10 = 15.
%t NestList[FromDigits[Reverse[IntegerDigits[#,2]],2]+2&,1,70] (* _Harvey P. Dale_, May 16 2021 *)
%Y Cf. A117831, A118828, A118361.
%K nonn,base
%O 1,2
%A Jan Nordbotten (Jan.Nordbotten(AT)mi.uib.no), May 16 2006
|