This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A133018 #19 Mar 12 2025 09:42:47 %S A133018 1,1,4,27,625,16807,1771561,170859375,54875873536,19683000000000, %T A133018 17080198121677824,16985107389382393856,43439888521963583647921, %U A133018 113809328043328941786781301,667840509835890864312744140625,4816039244598889571670527496421376 %N A133018 Partition number of n, raised to power n. %F A133018 a(n) = A000041(n)^n. %F A133018 a(n) ~ exp(1/24 - 3/(4*Pi^2) - (72+Pi^2)*sqrt(n)/(24*sqrt(6)*Pi) + sqrt(2/3)*Pi*n^(3/2)) / (3^(n/2) * 4^n * n^n). - _Vaclav Kotesovec_, Jun 23 2015 %e A133018 a(6)=1771561 because the partition number of 6 is 11 and 11^6=1771561. %p A133018 A000041 := proc(n) combinat[numbpart](n) ; end: A133018 := proc(n) A000041(n)^n ; end: seq(A133018(n),n=0..18) ; # _R. J. Mathar_, Jan 13 2008 %t A133018 Table[PartitionsP[n]^n,{n,0,15}] (* _James C. McMahon_, Mar 10 2025 *) %Y A133018 Cf. A000312, A058694, A062457, A133032, A259373, A265094. Partition numbers: A000041. %K A133018 nonn %O A133018 0,3 %A A133018 _Omar E. Pol_, Oct 31 2007 %E A133018 More terms from _R. J. Mathar_, Jan 13 2008 %E A133018 a(15) from _James C. McMahon_, Mar 10 2025