%I A080678
%S A080678 0,1,1,1,4,4,4,4,4,4,4,4,4,7,10,13,16,16,16,16,16,16,16,16,16,16,16,16,
16,
%T A080678 16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,19,22,25,
28,
%U A080678 31,34,37,40,43,46,49,52,55,58,61,64,64,64,64,64,64,64,64,64,64,64,64,
64
%N A080678 See Maple code.
%D A080678 J. Arkin, D. C. Arney, L. S. Dewald and W. E. Ebel, Jr., Families of
recursive sequences, J. Rec. Math., 22 (No. 22, 1990), 85-94.
%p A080678 f := proc(n) if n=0 then RETURN(0); fi; if n<=3 then RETURN(1); fi; if
n mod 4 = 0 then 4*f(n/4) elif n mod 4 = 1 then 3*f((n-1)/4)+f((n-1)/
4+1); elif n mod 4 = 2 then 2*f((n-2)/4)+2*f((n-2)/4+1); else f((n-3)/
4)+3*f((n-3)/4+1); fi; end;
%Y A080678 A generalization of A006166.
%Y A080678 Sequence in context: A141248 A088899 A066014 this_sequence A096300 A035672
A113472
%Y A080678 Adjacent sequences: A080675 A080676 A080677 this_sequence A080679 A080680
A080681
%K A080678 nonn
%O A080678 0,5
%A A080678 N. J. A. Sloane (njas(AT)research.att.com), Mar 03 2003
|