A344733 Numbers k such that k divides A327573(k).

1, 25, 387, 6063, 1416379, 1416403, 1416411, 331362359, 5068450527

Offset

1,2

Comments

The corresponding quotients A327573(k)/k are 1, 3, 5, 7, 11, 11, 11, 15, 17, ...

a(10) > 7.5*10^10, if it exists.

Links

Table of n, a(n) for n=1..9.

Example

a(1) = 1 since A327573(1) = 1 is divisible by 1.
a(2) = 25 since A327573(25) = 75 = 3 * 25 is divisible by 25.

Mathematica

f[p_, e_] := 2^DigitCount[e, 2, 1]; s[1] = 1; s[n_] := s[n] = s[n - 1] + Times @@ f @@@ FactorInteger[n]; Select[Range[1.5*10^6], Divisible[s[#], #] &]

Crossrefs

Cf. A037445, A327573.

The infinitary version of A050226.

Similar sequences: A064610, A344731, A344732.

Sequence in context: A261485 A125482 A306322 * A028130 A286719 A174515

Adjacent sequences: A344730 A344731 A344732 * A344734 A344735 A344736

Keyword

nonn,more

Author

Amiram Eldar, May 27 2021

Status

approved