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

Comments

Analogous to A338452 as A339549 is analogous to A093653.

Links

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

Example

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

Mathematica

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

Crossrefs

Cf. A000120, A093653, A338452, A339549.

Sequence in context: A196434 A197197 A295118 * A228417 A015580 A163308

Adjacent sequences: A339547 A339548 A339549 * A339551 A339552 A339553

Keyword

nonn,base

Author

Amiram Eldar, Dec 08 2020

Status

approved