OFFSET
1,1
COMMENTS
LINKS
PROG
(PARI) isA332457(n) = { my(s=sigma(n)); ((2==(s%8)) && (6==(sigma(s)%8))); };
(Magma) [k:k in [1..9700]| DivisorSigma(1, k) mod 8 eq 2 and DivisorSigma(1, DivisorSigma(1, k)) mod 8 eq 6]; // Marius A. Burtea, Feb 15 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Feb 15 2020
STATUS
approved