login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A339551
Starts of runs of 3 consecutive numbers with the same product of the binary weights of their divisors (A339549).
0
513059433, 3007912105, 4791685641, 11555664153, 44615854297, 111890605585, 121111724905, 163901238153
OFFSET
1,1
COMMENTS
Analogous to A338453 as A339549 is analogous to A093653.
EXAMPLE
513059433 is a term since A339549(513059433) = A339549(513059434) = A339549(513059435) = 1166400.
MATHEMATICA
f[n_] := Times @@ (DigitCount[#, 2, 1] & /@ Divisors[n]); s = {}; m = 3; fs = f /@ Range[m]; Do[If[Equal @@ fs, AppendTo[s, n - m]]; fs = Rest @ AppendTo[fs, f[n]], {n, m + 1, 5*10^9}]; s
CROSSREFS
Subsequence of A339550.
Sequence in context: A348798 A203261 A207041 * A319937 A186092 A034617
KEYWORD
nonn,base,more
AUTHOR
Amiram Eldar, Dec 08 2020
STATUS
approved