OFFSET
1,1
LINKS
Bruno Berselli, Table of n, a(n) for n = 1..1000
EXAMPLE
48 is a multiple of 6, and 4+8=12 is also a multiple of 6.
MATHEMATICA
Select[ Range[6, 700, 6], Mod[ Total[ IntegerDigits[#]], 6] == 0 &] (* Jean-François Alcover, Oct 26 2012 *)
PROG
(Magma) [n: n in [6..700 by 6] | IsZero(&+Intseq(n) mod 6)];
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Bruno Berselli, Oct 25 2012
STATUS
approved