OFFSET
1,1
LINKS
PROG
(PARI) isA332458(n) = if(!(n%2)||isprimepower(n), 0, my(s=sigma(n)); ((2==(s%8)) && (6==(sigma(s)%8))));
(Magma) [k:k in [3..270000 by 2]| not IsPrimePower(k) and 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