A165812 Ultraprimorials: a(n) = p#^p#.
1, 4, 46656, 205891132094649000000000000000000000000000000
Offset: 0
Links
- Eric Weisstein's World of Mathematics, Ultraprimorial
Programs
-
Maple
P:=proc(i) local a,n; a:=1; print(1); for n from 1 by 1 to i do a:=a*ithprime(n); print(a^a); od; end: P(10);
Extensions
Slightly edited by R. J. Mathar, Sep 29 2009
Comments