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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A171874 a(n) = a(n-1) + a(n-2)*a(n-3) + a(n-4)^a(n-5). 1
0, 0, 0, 1, 1, 2, 4, 7, 16, 46, 174, 3311, 268446771, 401906756202069927727330981 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,6

COMMENTS

First 5 terms are {0,0,0,1,1}; thereafter apply the recurrence. Note that 0^0=1.

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 0..15

R. Munafo, Accelerating Sequences

PROG

(MAGMA) I:=[0, 0, 0, 1, 1]; [n le 5 select I[n] else Self(n-1)+Self(n-2)*Self(n-3)+(Self(n-4))^Self(n-5): n in [1..14]]; // Vincenzo Librandi, Dec 18 2012

(Haskell)

import Data.List (zipWith5)

a171874 n = a171874_list !! n

a171874_list = [0, 0, 0, 1, 1] ++ zipWith5 (\z y x w v -> z + x*y + w^v)

   (drop 4 a171874_list) (drop 3 a171874_list)

   (drop 2 a171874_list) (tail a171874_list) a171874_list

-- Reinhard Zumkeller, Aug 14 2013

CROSSREFS

Sequence in context: A137568 A010355 A171880 * A113878 A026775 A027238

Adjacent sequences:  A171871 A171872 A171873 * A171875 A171876 A171877

KEYWORD

nonn

AUTHOR

Robert Munafo, Jan 21 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 June 26 04:39 EDT 2017. Contains 288752 sequences.