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,3

Links

Table of n, a(n) for n=1..51.

Formula

a(2^k) = 1.

Example

a(3) = 8: (3^3)^3 = 27^3 = 19683 = 100110011100011_2 which has 8 ones.

Mathematica

Array[DigitCount[#^(#^2), 2, 1] &, 50] (* Michael De Vlieger, Dec 26 2024 *)

Prog

(PARI) a379447(n) = hammingweight((n^n)^n)

Crossrefs

Cf. A000120, A002489, A379448.

Sequence in context: A209242 A103884 A103883 * A317640 A125235 A183892

Adjacent sequences: A379444 A379445 A379446 * A379448 A379449 A379450

Keyword

nonn,base

Author

Hugo Pfoertner, Dec 26 2024

Status

approved