A379447 a(n) is the number of ones in the binary expansion of (n^n)^n.
1, 1, 8, 1, 19, 27, 68, 1, 128, 105, 209, 120, 320, 266, 442, 1, 584, 524, 774, 476, 1006, 833, 1188, 477, 1486, 1248, 1746, 1066, 2068, 1733, 2365, 1, 2735, 2328, 3134, 1982, 3598, 3085, 4062, 1823, 4415, 3937, 5038, 3309, 5571, 4808, 6137, 1790, 6794, 5768, 7381
Offset: 1
Examples
a(3) = 8: (3^3)^3 = 27^3 = 19683 = 100110011100011_2 which has 8 ones.
Programs
-
Mathematica
Array[DigitCount[#^(#^2), 2, 1] &, 50] (* Michael De Vlieger, Dec 26 2024 *)
-
PARI
a379447(n) = hammingweight((n^n)^n)
Formula
a(2^k) = 1.