%I A106706
%S A106706 19,14,11,22,17,14,28,23,20,40,35,32,64,59,56,112,107,104,208,203,200,
               400,
%T A106706 395,392,784,779,776,1552,1547,1544,3088,3083,3080,6160,6155,6152,12304,
%U A106706 12299,12296,24592,24587,24584,49168,49163,49160,98320,98315,98312,196624
%N A106706 a(0) = 19; for n>0, successively subtract 5, subtract 3 and double.
%C A106706 Suggested by a test found on the Internet.
%H A106706 Jeffrey N. Shaumeyer, Bearcastle Blog, <a href="http://bearcastle.com/
               blog/?p=596">One Post, Two ...</a>
%p A106706 f:=proc(n) option remember; if n=0 then RETURN(19); fi; if n mod 3 = 
               1 then RETURN(f(n-1)-5); elif n mod 3 = 2 then RETURN(f(n-1)-3); 
               else RETURN(2*f(n-1)); fi; end;
%Y A106706 Sequence in context: A088934 A155848 A088399 this_sequence A099939 A135734 
               A109410
%Y A106706 Adjacent sequences: A106703 A106704 A106705 this_sequence A106707 A106708 
               A106709
%K A106706 nonn
%O A106706 0,1
%A A106706 N. J. A. Sloane (njas(AT)research.att.com), based on correspondence with 
               Jeffrey N. Shaumeyer, Apr 23 2006