




OFFSET

0,1


LINKS

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


FORMULA

a(n)=a(n1)^n, a(0)=3. a(n)=A000244(A000142(n)).  Vincenzo Librandi, Dec 16 2012


EXAMPLE

If n=2, 3^(2!) = 9
If n=3, 3^(3!) = 729
If n=4, 3^(4!) = 282429536481


MATHEMATICA

a=3; lst={}; Do[a=a^n; AppendTo[lst, a], {n, 1, 7}]; lst (* Vladimir Joseph Stephan Orlovsky, May 26 2009 *)
Table[3^n!, {n, 0, 9}] (* Vincenzo Librandi, Dec 16 2012 *)


PROG

(MAGMA) [3^Factorial(n): n in [0..7]]; // Vincenzo Librandi, Dec 16 2012
(Maxima) makelist(3^(n!), n, 0, 5); /* Martin Ettl, Dec 27 2012 */


CROSSREFS

Cf. A000142, A000244, A050923.
Sequence in context: A122961 A165421 A227432 * A072004 A095271 A054511
Adjacent sequences: A100728 A100729 A100730 * A100732 A100733 A100734


KEYWORD

nonn


AUTHOR

Parthasarathy Nambi, Jan 12 2005


STATUS

approved



