A264933 a(0)=0; a(1)=1; a(2)=2; a(n) = a(n-1)^a(n-2)^a(n-3).

0, 1, 2, 2, 4, 256, 340282366920938463463374607431768211456

Offset

0,3

Links

Table of n, a(n) for n=0..6.

Example

a(3) = a(2)^a(1)^a(0) = 2;
a(4) = a(3)^a(2)^a(1) = 2^2^1 = 4;
a(5) = a(4)^a(3)^a(2) = 4^2^2 = 256;
a(6) = a(5)^a(4)^a(3) = 256^4^2 = 340282366920938463463374607431768211456.

Mathematica

RecurrenceTable[{a[0]==0, a[1]==1, a[2]==2, a[n]==a[n-1]^a[n-2]^a[n-3]}, a, {n, 6}]

Prog

(Magma) I:=[0, 1, 2]; [n le 2 select I[n] else Self(n-1)^Self(n-2)^Self(n-3): n in [0..6]];
(PARI) a(n) = if(n<3, n, a(n-1)^a(n-2)^a(n-3));

Crossrefs

Cf. A051285.

Sequence in context: A114695 A134084 A267346 * A012858 A366756 A363842

Adjacent sequences: A264930 A264931 A264932 * A264934 A264935 A264936

Keyword

nonn

Author

Natan Arie Consigli, Dec 17 2015

Status

approved