OFFSET
1,2
FORMULA
a(p) = p for primes p since we have a(p) = 1^1' * p^p' = 1^0 * p^1 = p.
EXAMPLE
a(4) = 512; a(4) = Product_{d|4} d^d' = 1^1' * 2^2' * 4^4' = 1^0 * 2^1 * 4^4 = 1 * 2 * 256 = 512.
MATHEMATICA
Array[Times @@ Map[#^If[# < 2, 0, # Total[#2/#1 & @@@ FactorInteger[#]]] &, Divisors[#]] &, 19] (* Michael De Vlieger, Oct 14 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Oct 14 2021
STATUS
approved