Search: id:A104700
Results 1-1 of 1 results found.

%I A104700
%S A104700 1,2,2,4,8,12,96,108,10368,10476,108615168,108625644,11798392572168192,
%T A104700 11798392680793836,139202068568601556987554268864512,
%U A104700 139202068568601568785946949658348
%N A104700 a(2n)=a(2n-1)+a(2n-2), a(2n-1)=a(2n-2)*a(2n-3), a(1)=1,a(2)=2.
%t A104700 a[n_] := a[n] = If[ EvenQ[n], a[n - 1] + a[n - 2], a[n - 1]*a[n - 2]]; 
               a[1] = 1; a[2] = 2; Table[a[n], {n, 10}] (from Robert G. Wilson v 
               Mar 19 2005)
%Y A104700 Cf. A077753.
%Y A104700 Sequence in context: A123024 A079092 A039941 this_sequence A036761 A042979 
               A000018
%Y A104700 Adjacent sequences: A104697 A104698 A104699 this_sequence A104701 A104702 
               A104703
%K A104700 easy,nonn
%O A104700 1,2
%A A104700 Zak Seidov (zakseidov(AT)yahoo.com), Mar 19 2005

Search completed in 0.001 seconds