A339550 Numbers k such that A339549(k) = A339549(k+1).

1, 9, 85, 697, 1285, 2605, 4573, 5845, 6001, 6241, 6613, 7141, 7453, 8005, 10897, 12453, 13141, 15445, 19789, 20345, 21445, 21913, 22873, 25957, 36565, 36601, 39597, 44761, 46405, 53677, 56137, 56593, 61013, 63445, 70094, 72913, 76977, 80913, 82405, 87085, 87601

Offset: 1

Author

Amiram Eldar, Dec 08 2020

Keywords

• nonn
• base

Comments

Analogous to A338452 as A339549 is analogous to A093653.

Examples

			9 is a term since A339549(9) = A339549(10) = 4.
		

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000120, A093653, A338452, A339549.

Programs

Mathematica

f[n_] := Times @@ (DigitCount[#, 2, 1] & /@ Divisors[n]); Select[Range[10000], f[#] == f[# + 1] &]