A176147 a(n) = n^sopf(n), where sopf(n) is the sum of the distinct primes dividing n (A008472).

1, 4, 27, 16, 3125, 7776, 823543, 64, 729, 10000000, 285311670611, 248832, 302875106592253, 20661046784, 2562890625, 256, 827240261886336764177, 1889568, 1978419655660313589123979, 1280000000, 16679880978201

Offset: 1

Author

Michel Lagneau, Apr 10 2010

Keywords

• nonn

Examples

			a(1) = 1^0 = 1;
a(2) = 2^2 = 4;
a(3) = 3^3 = 27;
a(4) = 4^2 = 16.
		

Links

• T. D. Noe, Table of n, a(n) for n = 1..100

Crossrefs

Cf. A008472.

Programs

Mathematica

Table[n^Total[Transpose[FactorInteger[n]][[1]]], {n, 20}]

Formula

a(n) = n^A008472(n).