OFFSET
1,1
COMMENTS
n=10: sigma(10) = 1+2+5+10 = 18 = 3*6.
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
FORMULA
A000203(n) modulo 6 = 0.
{n: A084301(n) = 0 }. - R. J. Mathar, May 19 2020
MATHEMATICA
Select[Range@ 120, Divisible[DivisorSigma[1, #], 6] &] (* Michael De Vlieger, Feb 25 2017 *)
PROG
(PARI) isok(n) = !(sigma(n) % 6); \\ Michel Marcus, Dec 17 2013
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Labos Elemer, Aug 26 2002
STATUS
approved