login
This site is supported by donations to The OEIS Foundation.

 

Logo

The OEIS is looking to hire part-time people to help edit core sequences, upload scanned documents, process citations, fix broken links, etc. - Neil Sloane, njasloane@gmail.com

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A000304 a(n) = a(n-1)*a(n-2). 7
2, 3, 6, 18, 108, 1944, 209952, 408146688, 85691213438976, 34974584955819144511488, 2997014624388697307377363936018956288, 104819342594514896999066634490728502944926883876041385836544 (list; graph; refs; listen; history; text; internal format)
OFFSET

2,1

COMMENTS

A038500(a(n)) = A010098(n-2); for n > 2: A006519(a(n)) = A000301(n-3); A001222(a(n)) = A000045(n-1). -- Reinhard Zumkeller, Jul 06 2014

REFERENCES

Int. J. Math. Edu. Sci. Technol. Sergio Falcon, Fibonacci's multiplicative sequence, 34-2 (2003), 310-315 [From Sergio Falcon, Nov 23 2009]

LINKS

T. D. Noe, Table of n, a(n) for n = 2..18

FORMULA

For n>=4, a(n) = 2^A000045(n-3)*3^A000045(n-2). - Benoit Cloitre, Sep 26 2003

For n > 2: a(n) = A000301(n-3) * A010098(n-2). -- Reinhard Zumkeller, Jul 06 2014

MAPLE

A000304 := proc(n) option remember; if n <=3 then n else A000304(n-1)*A000304(n-2); fi; end;

a[0]:=2: a[1]:=3: for n from 2 to 13 do a[n]:=a[n-1]*a[n-2] od: seq(a[n], n=0..10); # Zerinvary Lajos, Mar 19 2009

MATHEMATICA

a=2; b=3; lst={a, b}; Do[z=a*b; AppendTo[lst, z]; a=b; b=z, {n, 12}]; lst (* Vladimir Joseph Stephan Orlovsky, Feb 17 2010 *)

t={2, 3}; Do[AppendTo[t, t[[-1]]*t[[-2]]], {n, 15}]; t (* Vladimir Joseph Stephan Orlovsky, Nov 23 2010 *)

nxt[{a_, b_}]:={b, a*b}; Transpose[NestList[nxt, {2, 3}, 12]][[1]] (* Harvey P. Dale, Nov 16 2014 *)

PROG

(Haskell)

a000304 n = a000304_list !! (n-2)

a000304_list = 2 : 3 : zipWith (*) a000304_list (tail a000304_list)

-- Reinhard Zumkeller, Jul 06 2014

CROSSREFS

Cf. A000045, A000301, A001222, A006519, A010098, A038500, A249406.

Sequence in context: A093468 A185625 A114302 * A000614 A233239 A018290

Adjacent sequences:  A000301 A000302 A000303 * A000305 A000306 A000307

KEYWORD

nonn

AUTHOR

N. J. A. Sloane

EXTENSIONS

More terms from Vladimir Joseph Stephan Orlovsky, Feb 17 2010

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified May 28 20:12 EDT 2017. Contains 287241 sequences.