The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A118655 Numbers k such that Hamming weight of k equals Hamming weight of k^3. 4
 1, 2, 4, 8, 16, 32, 64, 128, 256, 512, 1024, 2048, 4096, 8192, 16384, 32768, 56953, 65536, 113906, 131072, 227812, 262144, 455624, 524288, 911248, 1048576, 1822496, 1830651, 2097152, 3644992, 3661302, 4194304, 5502457, 7289984, 7322604 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS A000079(n) is a subsequence because the Hamming weight of any A000079(n) is 1 and cubing such a number just adds binary zeros. A077436 is the sequence when the a(n) is squared, not cubed as here. LINKS Donovan Johnson, Table of n, a(n) for n = 1..177 (terms <= 2^40) FORMULA A000120(a(n)) = A000120(a(n)^3). MATHEMATICA Select[Range[10^6], DigitCount[#, 2, 1] == DigitCount[#^3, 2, 1] &] (* Amiram Eldar, Jul 16 2023 *) PROG (PARI) bitcnt(n)= { local(bitv, bitl) ; bitv=binary(n) ; bitvl=matsize(bitv) ; return(sum(i=1, bitvl[2], bitv[i])) ; } { for(i=1, 8000000, if(bitcnt(i)==bitcnt(i^3), print1(i, ", ") ; ) ; ) ; } CROSSREFS Cf. A077436, A000079, A000120. Sequence in context: A320487 A323830 A370748 * A335891 A249169 A247208 Adjacent sequences: A118652 A118653 A118654 * A118656 A118657 A118658 KEYWORD easy,base,nonn AUTHOR R. J. Mathar, May 18 2006 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 15 11:45 EDT 2024. Contains 375938 sequences. (Running on oeis4.)