%I A117616
%S A117616 0,2,8,34,136,546,2184,8738,34952,139810,559240,2236962,8947848,
%T A117616 35791394,143165576,572662306,2290649224,9162596898,36650387592,
%U A117616 146601550370,586406201480,2345624805922,9382499223688,37529996894754
%N A117616 a(0)=0, a(n)=4a(n-1)+2 for n odd, a(n)=4a(n-1) for n even.
%D A117616 L. Rosenfeld, Nuclear Forces, section II, Interscience, New York, 1948, 
               p 202
%p A117616 a:=proc(n) if n=0 then 0 elif n mod 2 = 1 then 4*a(n-1)+2 else 4*a(n-1) 
               fi end: seq(a(n),n=0..23);
%t A117616 b[0] := 0 b[1] := 2 b[n_?EvenQ] := b[n] = 4*b[n - 1] b[n_?OddQ] := b[n] 
               = 4*b[n - 1] + 2 a = Table[b[n], {n, 0, 25}]
%Y A117616 Sequence in context: A026577 A111643 A000163 this_sequence A014445 A113440 
               A034999
%Y A117616 Adjacent sequences: A117613 A117614 A117615 this_sequence A117617 A117618 
               A117619
%K A117616 nonn
%O A117616 0,2
%A A117616 Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Apr 07 2006
%E A117616 Edited by N. J. A. Sloane (njas(AT)research.att.com), Apr 16 2006