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

Author

Natan Arie Consigli, Dec 17 2015

Keywords

• nonn

Examples

			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.
		

Crossrefs

Cf. A051285.

Programs

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]];

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}]

PARI

a(n) = if(n<3, n, a(n-1)^a(n-2)^a(n-3));