%I A082560
%S A082560 1,2,4,3,6,5,10,4,8,7,14,6,12,11,22,5,10,9,18,8,16,15,30,7,14,13,26,12,
%T A082560 24,23,46,6,12,11,22,10,20,19,38,9,18,17,34,16,32,31,62,8,16,15,30,14,
%U A082560 28,27,54,13,26,25,50,24,48,47,94,7,14,13,26,12,24,23,46,11,22,21,42,20
%N A082560 a(1)=1, a(n)=2*a(n-1) if n is odd, or a(n)=a(n/2)+1 if n is even.
%C A082560 b(1)=1, b(n)=2*b(n/2) if n is even, or b(n)=b(n-1)+1 if n is odd produces 
               the sequence of natural numbers.
%F A082560 if n is in A010737 : a(n)=n-1
%o A082560 (PARI) a(n)=if(n<2,1,if(n%2,2*a(n-1),1+a(n/2)))
%Y A082560 Sequence in context: A129767 A119618 A113321 this_sequence A127202 A034701 
               A091857
%Y A082560 Adjacent sequences: A082557 A082558 A082559 this_sequence A082561 A082562 
               A082563
%K A082560 nonn
%O A082560 1,2
%A A082560 Benoit Cloitre (benoit7848c(AT)orange.fr), May 04 2003