login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A133400 a(0)=a(1)=a(2) = 1, thereafter a(n) = a(n-1)*a(n-2)*a(n-3) + 1. 3
1, 1, 1, 2, 3, 7, 43, 904, 272105, 10577265561, 2601826668310218121, 7488387181338771882437732599874506, 206081999881071045385328009597554265108557649484947339933019787 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

COMMENTS

A tribonacci analog of A001056.

a(13) has 115 digits. - R. J. Mathar, Dec 10 2007

LINKS

Seiichi Manyama, Table of n, a(n) for n = 0..16

FORMULA

a(n) ~ c^(t^n), where c = 1.1004451797920944914628..., t = A058265 = 1.8392867552141611325518... . - Vaclav Kotesovec, May 05 2015

EXAMPLE

a(8) = a(7)*a(6)*a(5) + 1 = 904 * 43 * 7 + 1 = 272105.

a(9) ~ 2.60182667 * 10^18.

a(10) ~ 7.48838719 * 10^33.

a(11) ~ 2.06082 * 10^62.

MAPLE

A133400 := proc(n) local i ; if n <= 2 then 1; else 1+mul( A133400(i), i=n-3..n-1) ; fi ; end: seq(A133400(n), n=0..15) ; # R. J. Mathar, Dec 10 2007

MATHEMATICA

RecurrenceTable[{a[0]==1, a[1]==1, a[2]==1, a[n] == a[n-1]*a[n-2]*a[n-3] + 1}, a, {n, 0, 15}] (* Vaclav Kotesovec, May 05 2015 *)

nxt[{a_, b_, c_}]:={b, c, a*b*c+1}; NestList[nxt, {1, 1, 1}, 15][[All, 1]] (* Harvey P. Dale, Mar 05 2017 *)

PROG

(PARI) m=15; v=concat([1, 1, 1], vector(m-3)); for(n=4, m, v[n]=v[n-1]*v[n-2] *v[n-3] +1 ); v \\ G. C. Greubel, Sep 20 2019

(MAGMA) I:=[1, 1, 1]; [n le 3 select I[n] else Self(n-1)*Self(n-2)* Self(n-3) + 1: n in [1..15]]; // G. C. Greubel, Sep 20 2019

(Sage)

def a(n):

    if (n<3): return 1

    else: return a(n-1)*a(n-2)*a(n-3) + 1

[a(n) for n in (0..15)] # G. C. Greubel, Sep 20 2019

(GAP) a:=[1, 1, 1];; for n in [4..15] do a[n]:=a[n-1]*a[n-2]*a[n-3]+1; od; a; # G. C. Greubel, Sep 20 2019

CROSSREFS

Cf. A001056, A007660, A058265.

Sequence in context: A091771 A072714 A051786 * A113845 A072713 A000058

Adjacent sequences:  A133397 A133398 A133399 * A133401 A133402 A133403

KEYWORD

easy,nonn

AUTHOR

Jonathan Vos Post, Nov 24 2007, Nov 26 2007

EXTENSIONS

More terms from R. J. Mathar, Dec 10 2007

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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 4 06:41 EDT 2020. Contains 334822 sequences. (Running on oeis4.)