[go: up one dir, main page]

login
A336458
Numbers k for which A065330(k) = A065330(sigma(k)).
3
1, 2, 3, 6, 28, 40, 84, 120, 135, 224, 270, 496, 672, 819, 1488, 1638, 3780, 8128, 10880, 24384, 30240, 32640, 32760, 66960, 167400, 174592, 406224, 523776, 1097280, 2178540, 3138345, 6276690, 6517665, 6656832, 8910720, 10480640, 13035330, 14705145, 17428320, 23569920, 29410290, 31441920, 33550336
OFFSET
1,2
COMMENTS
Numbers k for which A065330(k) = A336457(k).
Question: Is this a subsequence of A336461?
MATHEMATICA
Select[Range[10^5], SameQ @@ Map[Times @@ Map[#1^#2 & @@ # &, DeleteCases[ FactorInteger[#], _?(First@ # <= 3 &)]] &, {#, DivisorSigma[1, #]}] &, 97] (* Michael De Vlieger, Jul 24 2020 *)
CROSSREFS
Cf. A336461.
Subsequences: A000396, A005820.
Sequence in context: A228346 A269996 A336240 * A348867 A018318 A368209
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jul 24 2020
STATUS
approved