A174442 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.

3, 5, 8, 40, 48, 1920, 1968, 3778560, 3780528, 14284951879680, 14284955660208, 204059904209433724979773440, 204059904209448009935433648, 41640444505966182658016083427778017651139155192709120, 41640444505966182658016083631837921860587165128142768

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..23

Mathematica

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 *)

Crossrefs

Cf. A174418

Sequence in context: A027520 A195548 A174529 * A109342 A121371 A067094

Adjacent sequences: A174439 A174440 A174441 * A174443 A174444 A174445

Keyword

nonn

Author

Giovanni Teofilatto, Mar 20 2010

Extensions

Corrected by Harvey P. Dale, Nov 15 2021

Status

approved