OFFSET
1,1
COMMENTS
A subsequence of A156223.
EXAMPLE
a(7) = 4^4 * 5^5 = 800000.
MATHEMATICA
nn = 12; Select[Rest[Union[Flatten[Table[If[x > y, x^x*y^y, 0], {x, 3, nn}, {y, 2, nn - 1}]]]], # <= 4*nn^nn &] (* T. D. Noe, Nov 04 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Alex Ratushnyak, Nov 02 2013
STATUS
approved