|
%I #6 Nov 15 2021 16:03:59
%S 3,5,8,40,48,1920,1968,3778560,3780528,14284951879680,14284955660208,
%T 204059904209433724979773440,204059904209448009935433648,
%U 41640444505966182658016083427778017651139155192709120,41640444505966182658016083631837921860587165128142768
%N a(n) = a(n-1)+a(n-2) if n is odd, otherwise a(n) = a(n-1)*a(n-2) with a(1)=3 and a(2)=5.
%H Harvey P. Dale, <a href="/A174442/b174442.txt">Table of n, a(n) for n = 1..23</a>
%t nxt[{n_,a_,b_}]:={n+1,b,If[EvenQ[n],a+b,a*b]}; NestList[nxt,{2,3,5},15][[All,2]] (* _Harvey P. Dale_, Nov 15 2021 *)
%Y Cf. A174418
%K nonn
%O 1,1
%A _Giovanni Teofilatto_, Mar 20 2010
%E Corrected by _Harvey P. Dale_, Nov 15 2021
|
