OFFSET
1,1
COMMENTS
Based on testing the first 38 terms, it seems this is a subsequence of Zumkeller numbers (A083207). - Ivan N. Ianakiev, Sep 12 2023
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..56
László Tóth, A survey of the alternating sum-of-divisors function, arXiv:1111.4842 [math.NT], 2011-2014. See p. 7.
MATHEMATICA
beta[n_]:=Sum[d*LiouvilleLambda[n/d], {d, Divisors[n]}]; Select[Range[5500], #==6*beta[beta[#]]&] (* Ivan N. Ianakiev, Sep 12 2023 *)
PROG
(PARI) beta(n) = sumdiv(n, d, d*(-1)^bigomega(n/d));
isok(k) = 6*beta(beta(k)) == k;
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Marcus, Sep 11 2023
STATUS
approved