login
A152567
Numbers k such that A049445(k) is odd.
2
1, 11, 19, 24, 27, 33, 43, 51, 54, 68, 71, 74, 76, 83, 89, 90, 98, 101, 107, 117, 130, 135, 138, 144, 151, 153, 156, 163, 165, 178, 181, 188, 195, 199, 203, 205, 207, 212, 215, 226, 230, 235, 238, 244, 249, 251, 258, 267, 272, 278, 282, 285, 294, 298, 304, 305, 325, 327
OFFSET
1,2
LINKS
MATHEMATICA
Position[Select[Range[1, 1500], Divisible[#, DigitCount[#, 2, 1]] &], _?OddQ] // Flatten (* Amiram Eldar, Aug 16 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Dec 07 2008
EXTENSIONS
Edited by N. J. A. Sloane, Dec 07 2008
STATUS
approved