OFFSET
1,1
COMMENTS
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..20000
FORMULA
For all n >= 1, A349909(a(n)) = n. - Antti Karttunen, Feb 23 2022
MATHEMATICA
ad[1] = 0; ad[n_] := n * Total@(Last[#]/First[#]& /@ FactorInteger[n]); Select[Range[234], OddQ[ad[DivisorSigma[1, #]]] &] (* Amiram Eldar, Sep 19 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Sep 19 2021
STATUS
approved